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l.Q Monitor Changes 


1.1 Routine - LOCORE 

Modification - Locations M7]^{^ through SOif 

Reason - Locations H7 ]jL through SD]j|^ are no longer 

available to the user. More LOCORE locations were 
needed for the Part 1 Re-entrant FORTRAN math subrou- 
tines. 


l.E Routine - SYSBUF 


Mod i f ica ti ons - 1 . 

2 . 

3. 


Volatile Storage Block 

MMDIAG Routine modified to release Part 1 core 
when a mass memory error occurs. 

Partitioned Core tables 


Reasons - 1. The volatile storage block was increased by E words 
per priority level because MONI requests H words 
instead of fi. The Tth word is used to indicate 
direct or indirect request. It was also increased 
by 10 words per FORTRAN priority level. 

E. If Part 1 core is not released when a Mass Memory 
error occurs it could end up never being released. 
The routine now checks to see if allocatable core 
or Part 1 core is reserved and calls the appro- 
priate routine to release the reserved core. 

3. The Partitioned Core tables have been put in SYSBUF 
for use by the Partitioned Core Allocator and 
LIBEDT. 


1.3 Routine - NCMPRC3 

Modifications - 1. Mask for Request Code 

E. lb Bit Address 

Reasons - 1. The request code will occupy bits T-13 instead of 
bits H-m. The mask for the request code was 
modified to account for this. 

E. Because request could originate in Part 1 it was 
necessary to allow a lb bit address and to make 
an indirect request with a lb bit address. 
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l.M Routine - NFNR 

Modification - 1. Mask for Request Code 

E. It Bit Address 

Reason - 1* The routine was modified to mask for the request 

code as bits *1~13 instead of H-IM- Bit IM now indi- 
cates a Part 1 request. 

E. To account for IL bit addresses the routine checks 
for Part 1 type requests. If Part 1 requests the 
starting address and number of words are obtained 
unmodified from the request. Part □ requests are 
processed as before. 


l.S Routine - ADEV 

Modifications - It Bit Address 

Reason - Because request could have errors and go to ADEV for 

operator intervention the routine was modified to handle 
the lb bit addresses possible. The Part 1 indirect 
request was used to accomplish this- 


l.b Routine - RDISP 


Modifications 


1. Overflow condition with priority level 
E. lb Bit Address 
3- Tth Uord of Volatile 
Part 1 Core Allocator 
S. Mask for Request Code 
b. Part 1 Directory schedule request 
7. Additional re-entrant FORTRAN locations to 
to save 


Reasons - 1. Because the interrupt trap must contain a lb bit 

address it was necessary to save the overflow con- 
dition along with the priority level in the inter- 
rupt stack. This was accounted for when checking 
the priority of the interrupt stack against the 
priority of the scheduler stack. The overflow con- 
dition was restored before doing an EXI when the 
highest priority program was on the interrupt 
stack. 

E. The routine was set up to handle lb bit addressing 
throughout. This will allow request from the 
upper bank to be processed. 
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3. The Tth word of Volatile on a schedule request is 
tested to determine if the request was indirect or 
not. This word is set by flONI . 

If the request was a system directory request to 
Part 1 a jump is made to the Part 1 core allocator. 
Bit m of the request word is used to determine 
which core allocator to use. 

S. Whenever the request code is tested the mask is set 
to test bits ^-13 instead of H-m. The mth bit 
now indicates which type addressing to usei IS bit 
or It bit. 

b. Part 1 lb bit relocating loader is unable to load 
the 1st parameter of a normal directory schedule 
request so request code Ifl has been set aside for 
scheduling mass memory resident programs from 
Part 1. 

7. In order to remove all indirect parameters from 
calls to the -floating point arithmetic package 
within re-entrant FORTRANi it was necessary to add 
a few more locations to those saved by the sche- 
duler for FORTRAN levels. 


1.7 Routine - DRCORE 


Modifications 


1. Eliminated Multi-Level Indirect Addressing 
E. Tth Word of Volatile 
3. Part 1 Release Request 

M. Address to be released in RELEAS request is 
picked up from location b of Volatile. 


Reasons - 1. Because multi-level indirect addressing will not 
be allowed in the bSK 17DD it was necessary to 
, change that coding which used it. The coding was 

modified in the area where request priorities are 
set and where the wait thread is created. 

S. The Tth word of volatile is now tested to determine 
if a release request is indirect. 

3. If a release request has bit m set to indicate a 
Part 1 type request this routine now goes to the 
Part 1 release processor to release Part 1 parti- 
tions. 
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M. Before enabling interrupts hONI stores word 1 of a 
request parameter list in location L of Volatile. 
Picking up that parameter rather than going to the 
request parameter list decreases the chance of a 
user damaging the system by re-entering code which 
contains a release request. 


l.fi Routine - PARAME 

Modification - Guarrantee proper masking of result of IS bit 

ar i thme ti c . 

Reason - Because of hardware wrap around some incorrectly masked 
addresses were never noticed on the 3EK maskingi but in 
LSK they put parameters in the wrong bank. 


l.T Routine - COMMON 

Modification - Save overflow condition with priority level 

Reason - Because the LSK 1700 will require all lb bits in the 

interrupt trap address it is necessary to save the over- 
flow condition under software control. The priority 
level word of the interrupt stack was selected for the 
saving of the condition. Bit IS of the priority level 
in the interrupt stack will now indicate the overflow 
condition! 1 overflown D no-overflow. 

1.10 Routine - NIPROC 

Modification - Save and restore overflow condition if power fail 

in terrupt 

Reason - The overflow must be saved on the bSK 1700 because the 
interrupt trap requires a lb bit address word. The 
overflow condition mustbe saved when the Power Fail 
Interrupt occurs. The condition of the overflow must 
then be restored before doing an EXI after power has 
come back up. 


1.11 Routine - NMONI 

Modifications - 1. T Words of Volatile 

E. Request Code 
3. Word b of Volatile 
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Reasons - !• Since it is now possible to have 3ib bit address 
the indirect condition cannot be saved as bit IS 
of word 0 of the request. Nine words of Volatile 
are now requested and the Tth word is used to in- 
dicate direct or indirect! Set-indirect n clear- 
direct. 


E. The request code is now contained as bits *1-13 

instead of as before. Bit IM is now used to 

indicate a Part 1 type request. Previous request 
are now Part 0 type and are unaffected by the LSK 
modi f ica tions . 

3. In order to make the Part 1 indirect request re- 
entrant the first parameter of the request after 
the request code is saved in word L of Volatile 
before interrupts are enabled. 


1.12 Routine - RU 

Modifications - 1. Tth bJord of Volatile 

2. Part 1 type request 

Reasons - 1. The Tth word of volatile is now tested to deter- 
mine if the request was direct or indirect. This 
word is set by MONI. 

2. Part 1 type requests do not use the x indicator 
and are never indirecti there forei i f Bit IM is set 
and the request is a mass memory request the mass 
storage address immediately follows the request. 

Part 1 type request also may have IL bit request 
addresses therefore the schedule of the completion 
address must be a Part 1 type indirect. 


1.13 Routine - SPACE 


Modifications 


1. Tth word of Volatile 

2. Part 1 Core request 

3. Limits of initial load of PROTEC 

M. JMP to FFFF rather than 7FFF in words 
0 S 1 IL lb 

S. Set mode switch 

b. Read in Part 1 core resident on autoload. 
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Reasons - 1* The indirect/direct condition is saved as the Tth 
word of volatile therefore that word must be test- 
ed to determine if direct or indirect. 

E. Because the allocation of Part 1 core is different 
than allocatable core it is necessary to test the 
request code to determine if the request is a Part 
1 Core Request -CT17>. If the request is for Part 
1 Core a jump is made to the new core allocator. 

3. PROTEC was lengthened and so the area initially 
read into core needed to be expanded. 

If jump to zero occurs and DEBUG is not patched it 
will jump to FFFF rather than 7FFF 

lb lb 

5. A location with entry point flODbSK is set to 1 if 
mode is bSK and 0 if mode is 3EK . 

b. When an autoload occurs it is necessary to read 

in any core resident routines into Part 1 as well. 
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E.Q Drivers 


E.l Routine - DR172A 

Hodification - Mask For Request Code 

Reason - The mask for the request code was changed to be bits 

T-13 instead of bits H-IM. Bit currently indicates 
a Part 1 type request. 


2.E Routine - DISKUD 

Modification - 1. IL Bit Addresses 

E. Part 1 Type Requests 

Reasons - 1- When checking to determine if FUA is greater than 

LUA the previous method would not have sufficed be- 
cause of lb bit addresses. 

E. When the disk driver absolutizes the completion 
addresses and the startingn a check was added to 
account for Part 1 type requests. Part 1 type re- 
quests use the completion address as a lb bit add- 
ress as contained in the request. The starting 
address is always the bth word of the request and 
the disk address immediately follows the request. 


E.3 Routine - DR173E 

Modification - Mask for Request Code 

Reason - Because the request code is now bits H-13 the mask was 
changed to account for this. 


a.M Routine - TAPE 

Modification - Hth word of Volatile 

Reason - Since indirect request is now indicated by word a of 

Volatile the T14 request processor has been altered to 
check this word of Volatile. 
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a.S Routine - DBLDRV 

flodification - lb Bit Addressing 

Reason - Bit IS of the address of a driver'^s physical device 

table is used as a flag. Since this address will always 
be in bank □ this is acceptable but code had to be added 
to mask the bit off when the address is used. 


V 




o 

c 


AA 3777 


PftlNTCD IN USA. 



Arden Hill 


, CONTROL DATA CORPORATION 

De VG 1 oprnen t 


AUG D 1971 


DIVISION 


DOCUMENT CLASS 

PRODUCT NAME 

PRODUCT MODEL NO. 


IMS 


Special i^ystem 


PAGE NO. 


MACHINE SERIES 


00009 

TTTJD 


3.0 Job Processor - bSK 

Job Processor Modules 

JOBENT 

Til 

T7 

TS 

T3 

JOBPRO 

PROTEC 

JBKILL 

JPLOAD 

JPCHGE 

ASCHEX 

T13 

MIPRO 

RESTOR 

All modifications were made for the following core conf igura tion : 

1. The Job Processor will operate in BANK □ in protected 
core 

S. Unprotected core will reside wholly within BANK □ 

All modifications are based on MSOS 3.Q released version- 


3.1 JOBENT 

There are no changes for indirect addressing to convert this pro- 
gram for the bSK 17DQ. 


3.2 Til 

No changes for indirect addressing to convert this program for 
the bSK 1700. 

This program was modified to use word a of volatile for the in- 
direct check -Cinstead of the A register}. 

Modification was also made to prohibit the locations passed in 
either A or (3 from referencing the upper bank. 
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3.3 T7 

There was a change to remove indirect addressing for the L5K 
17DQ. 

This change was made at COSY Card numbers MSt SEt S3n Sfli ILTi 
17Q. 

This program was modified to use word fi of volatile for the 
indirect check -Cinstead of the A register}. This change was 
made at COSY Card number Mfi. 


3.M TS 

The mode flag is tested and if mode is LSK return is not masked 
to 15 bits. ^COSY Card numbers ETi Mfi and 55 were involved. 


3.5 T3 

This program was modified to use word fi of volatile for the in- 
direct check {instead of the A register}. 

This change was made at COSY Card number MS. 


3.L JOBPRO 

The following list of COSY Card numbers indicate the locations 
where changes were necessary to remove indirect addressing for 
the L5K 17DD. 


COSY Card Numbers 


LE 

m 

LS *1 LL 
bfi 
1ST 
15M 
IbS 
Ibfi 
SMfl 
E51 
E73 


AA 3777 


PRINTtO IN USA. 


AUG 0 1971 


CONTROL DATA CORPORATION 

Arden Hills DoyGlopment ^ DIVISION 



DOCUMENT CLASS 

PRODUCT NAME 

PRODUCT MODEL NO. 


ins 

17 D 0 nsos bSK 


PAGE NO. 

Special System 

MACHINE SERIES 


noon 

170D 


COSY Card Numbers -Ccontinuedl 


27T 

aaa 

3QT 

327 1 32a 
Ma3-, ^a^ 


3.7 PROTEC' 


nodif ications 


1. Size of JBKILL overlay 

2. Save overflow on priority level 

3. Remove multilevel indirect 
M. Allow Part 1 requests 

S. Issue diagnostic if D and X bits both set or 
bit 15 on Ct S or N when J) bit is set. 


O. 

c 


Reasons - 1. JBKILL has been expanded therefore more room is 
necessary for it. 


2. node must always be checked when return and priority 
level are saved and restored to see whether over- 
flow is to be saved on return address or on priority 
level . 


3. Any two word absolute indirect addressing had to be 
removed . 


Requests with the D bit set and the Part 1 indirect 
request must be allowed from unprotected core. 

5. As long as Part 1 requests are allowed they must be 
legal . 


3. a JBKILL 

There are several changes to this module to remove indirect 
addressing for the LSK 17QQ. 

These changes are at COSY Card numbers 13ai 13T and 1M2. 

node had to be tested to see if overflow was saved on return or 
on priority level. 

C ; These changes are at COSY Cards Mtn a^n HO and HH. 
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3.T UPLOAD 

To remove indirect addressing for the LSK 1700 modifications 
were made at the following COSY Cards. 

COSY Card Numbers 

t.7 

t.6 

17T-, IflO 
aSSi 5Sb 
3M3-. 3MM 


3. ID JPCHGE 

nodi f ications to remove indirect addressing for the LSK 1700 
were made at COSY Card numbers 7 Mt 75 in this module- 


3.11 ASCHEX 

There were no changes necessary to this module to operate it in 
the LSK 1700- 


3.12 T13 

Modifications were made at: 

COSY Card number EL and for the program to check word a of 
volatile rather than the A register for the indirect indicator- 

COSY Card numbers 307n 30a and 33l’ to remove indirect addressing. 

COSY Card numbers llEi 115 to correctly mask 15 bit address- 


3.13 MIPRO 

There were no changes necessary in this program for operation 
in the L5K 1700. Howevern entry to the system test package was 
put in- 

3.m RESTOR 

Modifications were necessary in this program to remove indirect 
addressing for the L5K 1700- 

They were made at COSY Card numbers a*=l an'd TO. 
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M.D Debugging Aid Routines 


M.l ODEBUG 

Modifications were necessary to the following: 

LHX “ It was necessary to modify the calculation of relative 
entriesn i. e. entries with « following the /. 

DPC “ The test for end location greater than beginning location 
was altered to take IL bit address correctly. 

SCN - The test for search finished had to be altered to take IL 
bit address correctly. 

SET - The test for finished had to be altered to take IL bit 
address correctly. 

MBC - The check to see which end of block to start with and the 
test for finished both must take lb bit addresses into 
account. 

SPE - Starts with FFFF rather than 7FFF 

lb lb 

CPP and 

SPP - The test for done must handle lb bit address compare 
correctly. 


M.E Module - RDMPCR module of Recovery Package 

The legality check for beginning location before ending location 
was changed to accomodate lb bit address calculation. 
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S.O LIBEDT 

Modification - Two new modules were added to process the loading 

of core-residen t and mass storage resident rou- 
tines in Part 1. Reference section 3Si additions 
occur as indicated by section numbers above each 
addi ti on . 


5.1 Reference 3S.L.E of 3-0 IMS 


GROUP SUBR M.S. 
NO. ADDRESS 


RELOC SUBROUTINE SUBROUTINE 

FACTOR INCREMENT NAME 


T AINRBL-LBDT 


AINLOC 


0 

AINLOD 

MOVMM 


AINRBL 

LODR 

MVMM 


10 AINSMb-LBDT STMtSLB □ 


AINSMb 


S.E Reference 35. L. 3 


CONTROL STATEMENT 


INTERPRETATION CODE ENTRY POINT NAME 


mA 


13 


AINSN 


mY 


m 


YINSN 


5.3 Reference 35.L.4 

LIT No DATBAS entry point in system. Error occurs 

when user requests use of system data and there 
is no system data defined. 

LED Irreco vera ble error from the loader. 

LEI Attempt to load upper bank core resident more than 

once after a system insta 1 la tion . 


S.M Reference 35.b.5.S 

IDUC-. NOULRi REMOVi REMFIL-. UPDATE-, and POINT are used in the 
«A and ^Y statements. They are equated to labels. 
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PARAD = PABA = REMOV 
PAND = REMFIL 
DBASE = UPDATE 
PACOM = POINT 
lOUC = CPIAD 
NOULR = CPILN 

5.5 Reference 35.fl.3.T 

System Library Update for Part 1 Programs - AINSN 

The AINSN program loads and absolutizes mass resident programs 
which will run in partitioned core. The statement which calls 
this program is 


w A n 0 RD T S 1 N T D 1 C T L T n 

The parameter ORD is validated to be numeric. All other para- 
meters must be alpha. Statement format failure causes the error 
LDb to appear on the output comment medium and the statement 
processing to be aborted. 

If the ordinal is numeric the index into the System Directory 
is calculated and saved. 

Next the numbers of the partitions requested are checked to in- 
sure that they are not out of range. The base address of the 
starting partition and the last word address plus one of the end 
partition are set up for the loader. 

If the D parameter is not set a zero is set in for the data base 
of system data. If the D parameter is set the Core resident 
entry point table is searched for the entry point DATBASn which 
is the base of system data. 

If DATBAS is not found the error LIT is given and the «A pro- 
cessor is exited. 

If DATBAS is found its address is set up for the loader. Next 
the C parameter is checked. If no C parameter is present a zero 
is set for the base of Common. 

If the C parameter is present and there is no system Common the 
error L13 is given and the «->A processor is exited. 
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If the C parameter is present and there is system common the 
base of system common is set up for the loader. 

An indicator is set for the L parameter. 

The setbases function is sent to the loader. 

Then the loading of the program starts. 

First a relocatable load function is sent to the loader. 

This functions loads binaries from standard input until 
the termination signal is found. 

Then the program checks the L indicator. If set it re- 
quests the operator to indicate the new input media. The 
user responds with the new input median and loading con- 
tinues until the user replies with the terminate statement. 

Uhen the user gives the terminate signaln or if there is no L 
parameter the program proceeds: 

first among the programsn 

if no unpatched externals it goes to print memory map else 
it links to the CREPl table 

if no unpatched externals it goes to print memory map else 
it links to the CREP table 

if no unpatched externals it goes to print memory map else 
it prints the unpatched externals -Cthe loader after it is 
through linking checks for un patched externals if it finds 
any it interrogates the user whether to continue see sec- 
tion 1 for complete description}. 

The memory map is printed if the f1 parameter was found. Else 
it continues. 

The loading is completed and the mA processor proceeds to get 
the loaded program into its location on mass storage -Cit is 
loaded onto scratch mass storage} and modify the system to 
reflect this new information. 

First the entry for the program in the System Directory is set 
so that no one can use it while it is being modified. 

Next the loaded program is moved into its proper location on 
mass storage. If it is smaller than the program currently in 
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the entry it is moved into the location of the program currently 
in the entry. If it is largerT it is moved to the defined 
scratch area and the beginning of the scratch area is redefined. 
The system directory is updated. The completion address is the 
beginning location at which the program was loaded. The D bit 
is set in the request word. Location on mass storage is cor- 
rected. The directory thread is cleared. Then the system 
directory image is cleared. The sectors where the old program 
resided are released in the sector availability table. The 
sectors where the new program resides are made unavailable in 
the sector availability table. 

The mA processor is exited. 


S.L Reference 3S.a.3.1Q 

Core Resident Part 1 Program Initializer - YINSN 

In the bSK isyscem programs which reside permanently 
in core in the upper partn Part It are loaded post initializa- 
tion using, the library editing program via the processor. 

The mY processor - YINSN - loads and absolutizes the programs 
which are to be permanently resident in Part 1 of core. The 
statement which calls this program is 

«YiSTDTCTL-.n 


The S parameter must be numeric. 

Other parameters are validated to be alpha. Statement format 
failure causes the error LDL to appear on the output comment 
medium and the statement processing to be aborted. The program 
gets the S parameter. 

If the S parameter is not present the LDL error occurs and the 
mY processor is exitedi else it must be the last defined parti- 
tion. If not the LOb error is given and the processing is 
aborted . 

If it is the last defined partition the starting address is set 
up for the loader. The last word address plus one of the parti- 
tion is set up for the loader. 

Next the program gets the D parameter. 
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If the D parameter is not set the data base of system data is 
set to zero. If the D parameter is set the core resident entry 
point table is searched for the entry point DATBAS which is the 
base of system data. 

If DATBAS is not found the error LIT is given and the processing 
aborted- 

If DATBAS is found its address is set up for the loader. 

Next the C parameter is checked. If no C parameter is present 
the base of system Common is set to zero. 

If the C parameter is present and there is no system Common the 
error L13 is given and the statement processing is aborted. 

If the C parameter is present and there is system Common the 
base of system Common is set up for the loader. 

An indicator is set for the L parameter. 

The setbases function is sent to the loader. 

Then the program loading starts. 

First a relocatable load function is sent to the loader. 

This function loads binaries from standard input until the 
termination signal is found. 

Then the program checks the L indicator. If set it re- 
quests the operator to indicate the new input median and 
loading continues from the media indicated. This process 
continues until the user replies with the terminate state- 
ment. 

When the user gives the terminate signeln or if there is no L 
parameter the program proceeds. It functions the loader to link 
entry points firstn among the programs 

if no unpatched externals it goes to print memory map'n elsen 
it links to the CREPl table 

if no unpatched externals it goes to print memory mapi elsei 
it links to the CREP table 

if no unpatched externals it goes to print memory mapi elsei 
it prints the unpatched externals -[after the loader is 
through linking it checks for unpatched externale. If it 
finds any it interrogates the user whether to continue. 

See section B-1 for complete description.! 
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The memory map is printed if the M parameter was found. Else 
it continues. 

Next the CREPl table is moved to permanent mass storage. If a 
CREP 1 table is already on mass storage an error El is generated. 
If not the program finds a string of sectors long enough to hold 
the CREPl table and moves it to permenent mass storage. It up- 
dates the CREPl pointer -CSCREPl} on the Core image and the start 
of scratch if required. 

Then the absolutized program is loaded into core at the parti- 
tion indicated. This is also written to permanent storage. 

After it is written to permanent mass storage the autoload pro- 
gram which reads this part of the system into the partition at 
autoload time is set up to contain the correct data as to loca- 
tion in coren length in wordsn and location on mass storage. 

These words are also updated on the Core image on mass storage. 

The absolutized program may be written out only oncen after a 
system installation. Subsequent attempts will cause an error 
El to be printed and the program aborted. 


5.7 Reference ES-T.E.fl Group No. T - AINLOC 
AINLOC - Subroutine T 

AINRBE - sets up relocatable load function and calls the loading 
subroutine . 

LODR - loading subroutine. This routine loads in the loader if 
not in core and then functions it with the command passed 
it from the calling program. 

On entry to loader A = loader function code on return 
from loader 

A = □ function completed 

= -0 irrecover able error all cases 

Q = negative unpatched externals not negative - 
no unpatched externals 

I = pointer to a E word parameter pack 

E word parameter pack 

Word £ address of loaded program 
Uord length of loaded program 
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These parameters are used to get the 
length and location on mass storage of 
the CREPl tablei and of the absolutized 
program . 


On return from completing the load function this routine 
interrogates the register. If the A register is -D it 
terminates the load with an error ED. If not the para- 
meters are saved if the function was load or build CREPl 
table in LIBEDT Common arean and the (3 register is 
passed back to the calling program. 

MOVrin - this subroutine performs a mass storage to mass storage 
transfer. It uses unprotected core for its buffer and 
presumes it has the entire unprotected area available 
for a buffer. 



Croup No. ID - STM(3tiB 
smtSbB Subroutine ID 

This subroutine is called by the «A processor and is used to 
update the system directory for the ordinal in question on the 
core image. 



2 





B 


D 

1 



CONTROL DATACORPORATION 
SOFTWARE DOCUMENT 

SAMPLE CODE Q 

FLOWCHART 
DECISION TABLE □ 
OTHER □ 

X/rl<; T^Vk /7^o 

PROJECT NO. 

iQl 

approved 


LvlfOi' 

PROJECT MGR. 



! 

PACE / OF J 

PROJECT NAME I'/PO 




ISSUE 

NUMBER DATE 

TASK NO. 




DRAWN BY ^ , DATE } '•" ‘'/I 

TASK NAME 1 . ) P- i' /' ~T 





USA 


AA1 365 lFO>«MtHl.Y CA127-I) 


2000 0 onv 


















V > 
























CONTROL DATACORPORATION 

SOFTWARE DOCUMENT 

sample code 

□ 

FLOWCHART 

0 

DECISION TABLE 

□ 

other 

□ 


DOCUMENT 
C LASS 


_Z^/^ S ^YP^* /76 0 I project no. 


PROJECT MOR. 


PACE '^Op!^ ,:j I PROJECT name ) 70 0 


TASK NO. 


TASK NAME 1-- I T. f I'. 7 


AA 1365 (roHMCRLY CAt27-n 


PR1.'<TZD ti L15A 
























1385 irohMtBLT CA127-1) 


PRINTS) Cl USA 

















2 


4 






AAiSeS ircr.iMtf<l.y CA 127 * 1 I 


rnuns) a USA. 


















































1 


2 


4 




CONTROL DATACORPORATION 

SOFTWARE DOCUMENT 

SAMPLE CODE 

□ 

FLOWCHART 

□J 

DECISION TABLE 

□ 

OTHER 

□ 


-ry'i<r MACH. 

J // / S TYPE / /O'-' 


NUMBCH 


DRAWN EJ Y 



PROJECT 

NO. 



PROJEC T 

MGR. 



PROJEC T 

NAME / 

'■ ' '] r 

/': ' ■ 

TASK NO. 



APPROVED 

O 



i/rj (\ nn\/ 




























2 


4 


P.Et.p f(3 

. . 

ltr:< l/H) 


: /fAViFAV.VlL;^ 


\/ES-^ 


L : 1 : 'j ; 


,_c/u,p.rt/AJcn. - 

4,0.EiC>S.il 


r -''K *~1 ‘ 

y^s-iiLi^^ *fjo 


/ \MrJj 

1 


/^j/olOR 
. J^/rr: 


tKifjT 

EUrJcr 


SOFTWARE DOCUMENT 

sample code □ 

FLOWCHART [^] 

DECISION TABLE Q] 

OTHER □ 


AAlseS iroBMt«LY CAt27-n 


DOCUMENT -7" ,n MACH. , 

CLASS /// 3 TYPE ! / 0 ) 

PROJEC T NO. 

DOCUMENT V „ . • - 

TITLE Li'-' f f'. 

PROJECT MCR. 


number 

DRAWN BY 


C~ h .A 


PACE 


I TASK NO. 

DATE ' ' ' I ■ TASK NAME 


approved D 


p riVY 


rR;.‘TO3 w USX 









2 



4 

























1 


2 


4 


C Ct /r* t! /!'. X 




fMX 16 :a/gw 
Jpj rO 

Djp,,^c7vf^,y 


\Fnr./JOD^ . 

C'lT i -’/?A’7'. . 
/>:v.7a:4;/-^ 

j/'J-.-/lJ'\Layi 


?e 7: s7/f.t'/74o 

s^cuy. . - 




; j 


ssr O.B.IT, 

. /rJ x/o ? rtf L 

I oi/Ctcr^< y 




j 



i 3-^r i^Q.) ^D 
^ F.O//OT. ro. . 

. Oh^.ticr^/^y 


Ci-FAfN. . 

7//a’F >J. P . 


F£7 
L rn 



F£7 ai. . 

^0 C- 7 

CoXr/T 
7^ ciCWi^^ 




SOFTWARE DOCUMENT 

sample code □ 

flowchart 133 

DECISION TABLE Q] 

OTHER Q 


DOCUMCNT r- MACH. , , 

CLASS ...i//iJ TYPE 1 / n[} 

PROJECT NO. 

DOCUMENT , 

TITLE L i-0'1 

PROJECT MGR. 

PAGE 1 f'oP -.7 

PROJECT NAME /71 ^ G 

ISSUE 
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L.Q Re-entrant FORTRAN Package 


b . 1 This package has been reworked to run core resident in Part 1. 

It is to be loaded via an wY statement to LIB ED T. This will 
put it in the topmost partition toward FFFF-j^l where it may be 
used by any FORTRAN program running in partitioned core. All 
entry points are put in the CREPl table and linked to by the 
Part 1 loader only. 

This is essentially the same package released with nSOS 3.0 
{Sections LM and bS of INS}. The types of changes necessary 
were as follows: 

1. A transfer address was necessary because the Part 1 

loader requires transfer address on any program loaded 
under «A or to LIBEDT. 

E. lb bit arithmetic must be used in locating the para- 
meters passed in subroutine calls made from Part 1. 

This means bit IS may no longer be used to indicate 
relative parameters to most of the subroutines to 
indicate indirect parameters to the floating point 
arithmetic subroutine {entry point FL0T>. To accomo- 
date this the following things were done: 

a. All IS bit arithmetic was removed. 

b. All checks for and calculations of relative para- 
meters were removed. 

c. All indirect parameters in calls to FLOT were 
removed. This made necessary the addition of 
LOCORE locations 47 t r through SB]^j^ to those loca- 
tions used by FORTRAN and saved on interrupt by 
RDISP. 

d. Check for and calculation of indirect addresses 
was removed from FLOT. 

e. Relative parameters in calls to FLOT {which are« 
allowed! must have bit IS set if the reference 
is backward. 

3. Only Part 1 type requests may be used with this package 
so bit Ik had to be set in the request codes. Also 
Part 1 indirect request {request code lb> had to be 
used. 

« This is an incorrect modification and should be removed. 

fI.E.D. 
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L . E Fol lowing 

is a table of modifications by routine. 



ROUTINE 

nODIFICATION 

COSY NUflBERS OF 
LINES MODIFIED 

lOCODE 

Transfer addressn ENCODEt added 


II 


INITLl 

Remove calculation of relative 
parame ters 




a&Qio 

Remove calculation of relative 
parame ters 


Lfl-7Di 17^-lfll 


Part 1 indirect request used 


E7T-. ETM 



Bit IM set in request codes 


3LT-, 37D 


FORTRA 

Remove calculation of relative 
parame ters 


10D-1DE-, 
lETi ElE- 
E3^-E3b^ 
EfiO 

lES- 

ElM. 

E7fi- 


Part 1 requests used 


IDfli HDt 
iLTi nin 
EbE 

113. 

ITE. 

(3flEXPR 

Remove calculation of relative 
parameters 


ba-70 



Indirect parameters removed from 
calls to FLOT 


is3t 

Ifll 

17fl. 

tJflPRNR 

Remove calculation of relative 
parame ters 


31. SE-SM 


t3flABR 

Remove calculation of relative 
parame ters 


E3-EL 



Indirect parameters removed from 
call to FLOT 


E3-Eb-. 31 


IFALTER 

Remove calculation of relative 
parame ters 


EE-Sb 


SIGNR 

Remove calculation of relative 
parame ters 


17-El 
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COSY NUMBERS OF 


ROUTINE 

MODIFICATION LINES MODIFIED 


Indirect parameters removed from 
call to FLOT 

EL-, ET- 

EM-, ES 
31-. MS 

FXFLR 

Remove calculation of relative 
parame ters 

31-3S-, 

Afl-TE 

EXPRGR 

Remove calculation of relative 
parame ters 

lfi-S3 



Indirect parameters removed from 
call to FLOT 

lfl“E3-, 

Efl 


Relative addresses changed to 
bit relative on calls to FLOT 

£)□-, 117-. 13M-, 
137-1 ISE 

SC3RTFR 

Remove calculation of relative 
parame ter s 

S1-S3 


LNPRGR 

Remove calculation of relative 
parame ters 

17-SE 



Indirect parameters removed from 
call to FLOT 

17-EE-, 

E7 

TANHR 

Remove calculation of relative 
parame ters 

11 -ia 



Create It bit relative addresses^ 
in calls to FLOT 

U7n UT-i 

71 

SNCSR 

Remove calculation of relative 
parame ters 

ia-E3i 

SM-Ll 


Indirect parameters removed from 
calls to FLOT 

ia-E3-i 

SM-bln 

E a T 
bb 

ARCPGR 

Remove calculation of relative 
parame ters 

Ifl-ED 



Indirect parameters removed from 
calls to FLOT 

lfl-E5i 

Ea 


This modification is not necessary- 

n.E.Do 
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ROUTINE MODIFICATIONS 


COSY NUMBERS OF 
LINES MODIFIED 


FLOATR 


Remove code to handle indirect 
parame tens 

IHfl-BOt, 

Remove 15 bit addressing 
ar i thme t ic 

EID-Ell 
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l.D.D PART 1 - RELOCATING LOADER 

The Loader is a non-resident sub-program of the 17DD Operating 
System. The Loader is capable of loading relocatable binary 
programs produced by the 1700 Assembler. The design of the 
Loader is independent of the I/O con f i gura ti on of the hardware 
for the system on which it operates. A single version of the 
Loader accepts input from any devicei whether buffered or 
unbuffered. One of these devices may be a mass storage device 
such as the Library Unit or the Scratch Unit. 

l.Q.l STORAGE OF THE LOADER 

The Loader is stored in relocatable binary form on some exter- 
nal medium. The Loader is placed in the System Library as an 
absolute record during the System In i tia 1 i za ti on procedure. 

1.0. E LOADING OF THE LOADER 

The Loader may be brought into core by the LIBEDT «A or 
statement. 

The Loader is read as an absolute record from the System 
Library and placed in the upper most part of unprotected core. 
The Loader is accessed in the System Library through an entry 
in the System Library Directory. A word in this entry contains 
the length of the Loader. The length of the Loader is sub- 
tracted from the address which is the upper limit of unpro- 
tected core. The resulting address is the 1st core location 
to be occupied by the Loader. 

The Loader divides the remaining unprotected core into pages 
for the command sequencen entry point names and external 
names. The page length is 1‘^S words of which 3 words are flags 
for paging con trol . inE word pages are written to mass memory} 

The upper limit of unprotected core is contained in location 
$Fb. It is defined as the highest -[toward Part 1> unprotected 
address + 1. The lower limit of unprotected core is contained 
in location $F7. It is defined as the lowest -[toward □} 
unprotected address - 1. 

1.Q.3 OPERATION OF THE LOADER 

A Loader operation is initiated with a jump to the lowest 
-[toward □> core location occupied by the Loader. 
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1.0. H TYPES OF LOADER OPERATIONS 


The particular Loader operation to be performed is determined 
by the information passed to the Loader from the monitor via 
the A and Q register as illustrated: 


A reg : 
Q reg : 


IS 


H 3 

0 


LU 


T 

IS 



0 

TNA 


The ^T^ field indicates the type of Loader operation to be 
performed. 


T Field 

□ 


Loader Operation 
Relocatable Binary Load 


1 

a 

3 

S 


Set program base addresses 

Patch program entry points 

Patch to Part 1 core resident entry 
points -CCREPliT 

Build table of Part 1 core resident 
entry points 

Patch to Part □ core resident entry 
points 


b Print memory map 

7 Print unpatched externals 

The ^LU^ field contains the logical unit number of the input 
device to be used for this operation. This field is ignored 
if the T field is a iTEiMTbi or 7. 


The TNA field contains the core address of the program bases. 
This information is significant only if the Loader operation 
is a set bases function. The Q register is ignored in all 
other cases. 


1.0. 5 RELOCATABLE BINARY LOAD OPERATION 

The purpose of this operation is to load relocatable binary 
programs from any peripheral device. The Loader call to load 
relocatable binary input requires that the T field is set to 
zero . 
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The LU field contains a number which refers to an ordinal in 
the equipment table. If the left most bit of the LU field is 
onen the Loader will assume the input device is the 
standard input device. In this casen the Loader will address 
the standard input device indirectly via the address in 

the communication region n which is the location containing the 
ordinal for this device in the equipment table. The d 
register is ignored for relocatable binary loading operations. 

l.Q.L The Loader call to bring in LOAD-AND-GO input requires that 
the T field is set to zero. The LU field is set to the 
number of the equipment table entry for the mass storage 
device containing the scratch area. The d register is ignored. 

For LOAD-AND-GO inputn the Loader will address the mass storage 
device containing the scratch area indirectly via the address 
^B3 in the communication region. This is the location con- 
taining the ordinal for this input device in the equipment 
ta ble . 

1.0.7 SET PROGRAM BASES OPERATION 

The purpose of this operation is to set the bases for the pro- 
gram-CsI to be loaded-i divide unprotected core into pagesi and 
to initialize the page flags. This function must be the first 
function given to the loader after it is read into core by 
LIBEDT. The T field is 1 and the LU field is ignored. The d 
register contains the address of the first word of the 
program bases in LIBEDT. 

The program bases are: 

Word □ Address of start partition 
Word 1 Last word address + 1 of the end partition 

Word E Address of system data base -CD is system data not 

used} 

Word 3 Address of system common base ID if system common 
not used} 

l.Q.fl PATCH PROGRAM ENTRY POINTS 



This operation is performed subsequent to relocatable binary 
loading. The Loader will attempt to match external names in 
the Loader External table with entry point names in the 
Loader Entry point table. The last transfer name encountered 
is matched with an entry point name and the address is stored 
in the jump instruction that precedes the command sequence. 

If no unpatched externals exist after the patching operationi 
the pages are written out to the disk. 
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1.0. H PATCH TO PART 1 CORE RESIDENT ENTRY POINTS ICREPl} 

If T = 3 on inputn the Loader reads the CREPl table into core 
and stores these entry points into its entry point tablei and 
patches any entry points referenced by other programs. If no 
unpatched externals exist after the patching operation n the 
pages are written out to the disk. 

If a duplicate entry point is encountered in the Loader entry 
point table while loading the CREPl tablei the CREPl entry 
point is ignored and no diagnostic is issued. 

1.1. □ BUILD TABLE OF PART 1 CORE RESIDENT ENTRY POINTS 


/' 1 . 1.1 
0 - 


This function is given by LIBEDT when it encounters a «Y 
statement and must be given before the CREP table is stored 
into the Loader entry point table. The programisl entry points 
are squeezed together and stored on the disk behind the command 
sequence. Locations In the loader which contain address and 
length of CREPl are pointed to by I on return to LIBEDT- LIBEDT 
will move the table to an appropriate place on the disk and update 
PATCH TO coke RESIDENT the Sector Availability Table. 

If T = S on inputn the Loader searches the core resident 
directory for entry points to match any undefined externals in 
its table. If any are foundi a dummy program is loaded 
which contains the absolute addresses of core resident entry 
points. 


This dummy program and its directory are written when the system 
is initialized. The directory is in the same format as the 
Program Library directory! with all entry points pointing to 
the same program. This program consists of a dummy NAfl blocki 
as many ENT blocks as necessary to accommodate all core 
resident entry points and a dummy XFR block. 


The Loader treats this as a normal program! loads it in and 
patches any entry points referenced by other programs. 


If a duplicate entry point name is encountered in the Loader 
entry point table! the CREP entry point is ignored and no 
diagnostic is issued- If no unpatched externals exist! the 
pages are written out to the disk. 


1.1. E MEnORY flAP OPERATION 



The T field is L if the Loader is to produce a memory map. 
The LU field is ignored and the (3 register is ignored. 
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This typG of operation consists of the listing of the names 
in the entry point table together with their respective 
addresses . 

The first word addresses of common and data storage resorvations 
appear in the map as entry point addresses. 

If common storage had been declared during a previous load 
operationT the name together with the common storage 

relocation base would appear ahead of the entry point table on 
the list output. If data storage had been declared during a 
previous operation! the name together with the data 

storage relocation base would appear ahead of the entry point 
table on the list output. 

1.1. '3 PRINT UNPATCHED EXTERNALS 

This operation can be performed after any relocatable or table 
loading operation. The L character names of all unpatched 
externals are printed on the system print medium. An E is ^ 
output to the comment device._^ The operator must type in « 
to resume operations or « T ^ to indicate the load operation 
should be abandoned. 

1.1. M AVAILABLE CORE FOR PAGES 

The portion of the block of unprotected core not occupied by 
the Loader is available for pages. Pages start I^FTl + 1 
and are in ITS word blocks. 


1.1. S INPUT TO THE LOADER 


The Loader issues I/O requests to read formatted records in 
the Binary Node. The records are not to exceed 120 characters 
of data in length. The binary records processed by the Loader 
will hereafter be referred to as relocatable binary input 
records. These are the type of records generated as binary 
output by the assembler. There are six types of relocatable 
binary input records -[hereafter referred to as blocks.! Each 
block is identified by the 1st word -[1st 2 data characters! 
of the record as follows: 


NAME OF BLOCK 


CONTENTS OF 1st WORD 
{HEX VALUES! 


NAM 

RBD 

BZS 

ENT 

EXT 

XFR 


$2050 

^MOSO 

$b0S0 

^6050 

$A0SQ 

^COSO 
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Binary records not recognizable to the Loader will be regarded 
as illegal input and will cause the Loader Operation to be 
terminated. In addition to the relocatable binary input 
recordsn the Loader will process ASCII input. Since the 
Loader reads only in binary moden the input records must have 
as the 1st character and must terminate with a carriage 
return. A space is accepted in place of a carriage return in 
the event that the input device is a card reader. 

NAHE OF BLOCK IDENTIFICATION 

EOL «T carriage return 

EOL «T space 

Those ASCII records not recognizable to the Loader are regarded 
as Monitor Control Statements. Such a record will cause the 
Loading Operation to be interrupted. An exit is made to the 
monitor in order to process this statement. 

1.1. L EXIT FROM THE LOADER 

Exit from the Loader to the Monitor is with an indirect return 
jump to the address in ?EE. Immediately prior to exit from 
the Loadern the exit parameters are placed in the A t (3 a I 
registers as summarized below: 


EXIT FROM THE LOADER 

1.1. L.l Program loading continues until interrupted by an EOL state 
mentn an operating system control statementi or an error 
condition. 


1.1. L.E If loading is terminated by an EOL statementn the A register 

contains zeron the (3 register contains zeroi and the I 
register contains the address of the locations in the Loader 
that contain the sector address and number of words of the 
command sequence. 

1.1. L.3 If loading is terminated by an operating system control state- 

mentn the A register contains the address of the operating 
system control statement. 

1.1. b.M If the loader operation is terminated by an irrecoverable 

errori the A register contains negative zero. 

If loader operation is terminated with unpatched externalsn 
the Q register contains negative zero. 

SUMMARY OF TERMINATION PARAMETERS 
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1.1. L.S 

A register; 

1. Zero if operation terminated normally 
E. Negative zero! if operation was terminated 
by an irrecoverable error 
3. Address of monitor control statement if 

operation was terminated by a control state- 
men t . 

1 . 1 . L . L 

£3 register; 

1. Zero if no unpatched externals occur after 
a loader operation 

E. Negative zero if unpatched externals occur 
after a loader operation 


NOTE; The (3 register content is only significant after 
functions of ET4nSn and 7. 


l.l.b.7 I register; 1- Contains address of the locations in the 

Loader that contain the sector address and 
length of the command sequence or CREPl table 

NOTE; The I register content is only significant after a 
function of □ and 

1.1.7 OPERATION OF LOADER 

The Loader is divided into EM separate subprograms. The sub- 
programs of the Loader are all non-op tiona 1 . Each of the E4 
subprograms is required for the Loader to operate. The Loader 
is divided into subprograms for no reason other than to 
facilitate the handling at assembly time. Each subprogram 
may be assembled independently of the others. Within the 
source languagen no subprogram has either a CON pseudo or a 
DAT pseudoi therefore the Loader requires neither common nor 
data storage reser va ti ons . The EM relocatable binary programs 
produced by the assembler are linked together in the following 
way : 

Entrance to one subprogram from another is made with either a 
E word jump instruction or a E word return jump instruction! 
either using the relative mode of addressing. flany subprograms 
of the Loader are coded as closed subroutines! each to be 
entered at a unique entry point location with a return jump 
instruction. Exit from a closed subroutine is made with a jump 
to the address placed in its entry point location by execution 
of the return jump instruction at the time it was entered. 

Other subprograms are coded as open ended routines. flany of 
these open ended routines have more than one entry point. 
Entrance to such an open ended routine at one of its declared 
entry point locations is made with a jump instruction. Exit 
from an open ended routine is made with a jump to a location 
external to another subprogram using a two word jump instruction 
and the relative mode of addressing. 
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Within the source language of the Loadern the entry point names 
declared by the ENT pseudo in subprogram X are declared as 
external names by the EXT^ pseudos in any of the other sub- 
programs which reference this name. Because of the EXTm 
pseudoi the relocatable binary code generated by the assembler 
for instruction with external names as addresses provides for 
the relative mode of addressing. As the EM subprograms are 
linked together into an absolute record at load timen the 
relative addressing feature is a major factor in providing 
for a ^run anywhere"^ capability for operation of the Loader. 

The order in which the subprograms of the Loader occur with 
respect to each other is optional with one exception- The 
subprogram whose name is LOAD must occur at the beginning of 
the Loader. This is the initialization module. Since 
entrance to the Loader from the monitor is made with a jump 
to its lowest -[toward 0> location-i the initialization module 
must occur at the bottom end of the block of core containing 
the Loader - 

1-1. a LOADER TABLE 


The Loader Table comprises a list of entry points and externals 
processed during a sequence of Loader Requests. The Loader 
Table consists of an External tablen a Hash table for entry 
points and an Overflow table for entry points. The Loader 
Table is written into the pages in unprotected core. 


1 . 1 . a - 1 


Each entry in the Hash table and Overflow table consists of 
five words - 

0 

EXAMPLE 1 

ENT ABCDEF 

a 

3 
M 

Value is the address of the entry point- 


A 

B 

C 

D 

E 

F 

VALUE 

POINTER 


Pointer is a link to entries in the Overflow table with the 
same hash value- 
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l.l.fl.E Each entry in the External table consists of four words. 

0 

EXAMPLE 

EXT ABCDEF 1 

2 
3 

Bit IS of word zero indicates a relative or absolute external - 



Bit IS of word one is used to determine if the external is 
patched. 
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1.2.0 LOADl ROUTINE - INITIALIZATION 


The LOADl routine is the subprogram concerned with initializa- 
tion. Initialization is performed at the beginning of every 
Loader Operation. Entry to the Loader from the monitor is 
made by a jump to its lowest {toward □> core address. 

The 1st instruction to be executed upon entry to the Loader 
is a return jump to the location whose label is PART !• 

Prior to entering the Loaderi the entrance parameters have 
been placed in the A&c3 registers. 

The only function of PART 1 is to record the entrance para- 
meters in temporary storage locations: 

{A register! AINP 

{(3 register! C2INP 


1.2.1 CONBAS 

The function of CONBAS is to establish the relocation base for 
the Constant Table and record entrance parameters* 

The Loader is a program with a ^run anywhere^ option. In 
other words 1 this program has the capability of being read 
as an absolute recordn placed anywhere in memory and still 
being executable with little or no modification to the machine 
language of the Loader as it exists in the system library. 

In ^run anywhere^ programs of primary concern are those 
instructions which reference memory. There is no problem in 
the case of either a one word instruction or a two word 
instruction which uses the relative mode of addressing. There 
are no two word instructions using the absolute mode of add- 
ressing unless the address is set as some time during program 
execution. If it is necessary to use absolute addressingn 
the absolute value of a core location may be obtained at any 
time by use of a return jump instruction: 


RTJm 

BZS 

LIBSEC NUn 
BUFADR NUfI 


BUFADR 

DIRBUF {1L! 

$FFFF-,$FFFF 

$FFFF 


In the above sequence of codei the absolute value for the add- 
ress ^DIRBUF'^ will be placed in the location BUFADR upon 
execution of the return jump instruction* 
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1-E.S Constant Table 

During Loader Operations! the memory index or I register 
contains the relocation base for the Constant Table. The 
label assigned to the 1st location to be occupied by the Con- 
stant Table is CONTAB- The relocation base for the Constant 
Table is equal to the value of the address expression 

^CONTAB-1^. 

The m?th storage location is the starting location of the 
input area for storage of relocatable binary input blocks- 
The execution time value of this address is m7+TI>. This 
address is placed in the location S7+TI>. The value for the 
starting address of this input area +1 = mfl+TIl is placed 
in the location Sfl+TI>. Also the value for the starting add- 
ress -3 = IMM+TIT is placed in the location LE+-CI>. 

In addition to the aboven the E3rd location of the constant 
table is set to the value of the starting address for the 
Loader. Upon entry to PART 1 with a return jumpi the value 
= ^LOAD+1^ is placed in the location PART 1- Therefore! the 
location E3+-CI> is set to the value = {PART1>-1- 

The 31st location of the Constant Table is reserved for the 
storage of the relocation base of the Constant Table- The 
name of this location is ISAV and it is declared as an entry 
point name by the LOADl subprogram. If at any time during a 
Loader Operation! the contents of the I register should be 
destroyed las in the case of a status request>! the original 
value of ^CONTAB-1^ may be restored to it. In order to do 
this in a subprogram other than LOADl! it is necessary to 
declare ISAV as an external name in the other module- 

1.E.3 Accessing Locations in the Constant Table 

Whenever some routine addresses a location in the Constant 
Table! it does so with the following type of instruction: 

OPC- nil 

where : 

1- OPC represents a mnemonic for a memory reference 
instruction 

E- n represents an ordinal position in the Constant 
Table . 

3- I represents the memory index- 
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It is necessary that many locations in the Constant Table must 
be preset with specific values at the time the Loader is placed 
in core- Those locations in the Constant Table for which this 
does not apply are preset to a value of zero. 

External pseudos must be included in the source language for 
LOADl for those locations in the Constant Table preset to 
address constants where these address constants refer to 
locations in other routines- 

1-S-M Table of Contents of Constant Table 


ORDINAL 

NAME 

USE: 

1 

COMBAS 

relocation base for common 
storage at execution time 

a 

DATBAS 

relocation base for data 
storage at execution time 

3 

PROBAS 

relocation base for program 
currently being loaded at execu- 
tion time 

M 

COMLin 

highest address of common 
storage +1 at execution time 

5 

DATLin 

highest address of data storage ' 
+1 at execution time 

b 

CSt2Lin 

highest address of command 
sequence storage +1 at execu- 
tion time 

7 

EXTCTR 

points to next available loca-. 
tion in External Table 

a 

ENDSU 

• 

=1 if last relocation byte in 
RBD or BZS block 

T 

NGRLSU 

negative address relocation 
switch 

ID 

INPURD 

contains end of command sequence 
storage 

11 

INPREL 

contains rel - flag for word of 
sequence storage in RBD and BZS 
block 
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ORDINAL 

NAME 

USE: 

la 

CS(3NUn 

no. of sectors reservetd before 
command sequence start 

13 

ENTPNT 

contains address associated 
with name in EXT or ENT block 

m 

LINK 

contains address associated 
with name in loader table 

IS 

INPCTR 

used to address core location 
of command sequence storage 
at load time 

lb 

NOTLNK 

will be a 1 if unpatched 
externals are found 

17 

ENDINP 

highest address in load time 
core for command sequence 
s torage 

la 

BLANKS 

ASCII code for spaces = $2D20 

n-aa 


USED for tempory storage 

aa 

BASE 

base address of loader 

aM 

URDCNT 

address or character reference 
counter 

as 

COUNTl 

counter 

ab 

BZSSli) 

used by subroutines common to 
RBDPRO a BZSPRO*-. =1 for BZS 
blocks =□ for RBD block 

a? 

BLKCNT 

block counter 

aa 

SUb 

index counter 

aT 

ASAV 

temporary storage for A 
register . 

3D 

(3SAV 

temporary storage for (3 
regi s ter 

31 

ISAV 

storage location for constant 


table relocation base 
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ORDINAL 

NAME 

USE: 

3a~3W 

XFRNAN 

storage of b character XFR name 

3M-3A 

NAME 

temporary storage 

3T-M2 

TABSCH 

Loader Table search routine 
entrance and return 

M3 

HSHADR 

relative address of ENT or EXT 
name on mass memory 

MM 

HASHCD 

HASH CODE OF ENT or EXT 

MS-SD 

TEMP 

Temporary locations used in 
hash routine 

S1--S2 

BINASC 

Storage of ASCII code for 
number conversion 

S3-SL 

PRINT3 

error output routine -Cresume 
opera tor } 

57 

INPXCO 

contains address constant = 
^IMPUT^ or liM7+II> 

sa 

INPXCl 

contains address constant = 
"^INPUT^+li or 1M5+-CI} 

ST-bl 

PRINT2 

error output routine {Stop 
Opera tion} 

L2 

INDXCC 

contains address constant = 
^INPUT-B"^ or 1MM+-CII 

L3-bM 

NXTINP 

jump instruction to read next 
input block 

bs-ao 

HEXDIC 

ASCII codes for hex digits 

ai-at, 

ADJOVF 

routine to perform address 
ar i thme t ic 

57-^1 

CONVRT 

binary to ASCII conversion 
routine entrance AND RETURN 

11-TM 

PRINTM 

print out routine {prints 
characters name and M digit 
hex address} 
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ORDINAL 

HS-Hfl 

IDS 

IDb 

ID? 

IDfi 

IDT 

IID 

111 

IIB 

113-im 

IIS 

lit. 

117 

iia 


NAME 

PRINTS 

AINPUT 

(3INPUT 

LINKl 

NASINP 

HSHTBL 

PGELCN 

LGEPGE 

IGNORE 

LNKSTR 

LNKCTR 

LNKEND 

INPLUN 

ADDR 

EXTSTR 

CORADR 

PRODAT 


USE: 

print out routine {prints t. 
character names! 

contains A register upon entry 
to loader 

contains (3 register upon entry 
to loader 

entrance to routine which 
patches an entry to an external 

contains logical unit for 
MDRIV 

number of hash codes {entries! 
in hash table 

length of page with core flags 

largest command sequence page 
that has been stored into 

flag to ignore duplicate Ent 
points during crep load 

address of linktable 

next available location in 
link tablf’ . 

last address +1 in linktable 

logical unit number for input 
{L&A parameters for calling 
sequence! 

temporary storage for loop 
control 

word address of start of 
external table 

contains {$F7!+1 

non zero if protected data is 
declared 
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ORDINAL 

NAME 

USE: 

in 

PROCOn 

non zero if protected common is 
declared 

150 

PAGE 

length of page on mass memory t 
must be a multiple of Db 

151 

CS-3CTR 

last address of program command 
sequence storage +1 

155 

OVSTR 

word address of overflow table 
start 

153 

OVCTR 

points to next available loca- . 
tion in overflow table 

13^ 

DIFCON 

temporary storage 

15S 

ENTSEC 

start sector of ent/ext tables 

15k, 

CSI3SEC 

start sector of command sequence 
image 

157 

NAXPGE 

maximum page number that can 
be used on mass memory 

15fl 

NOPAGE 

number of pages in unprotected 
core 

15T 

PARBAS 

address of start partition 

130 

PARLIM 

last word address +1 of last 
partition 

131 

STRSEC 

start sector of image on mass 
memory 

135 

NDSDCT 

number of words stored on mass 
memory 

133 

XFRADR 

transfer address of name from 
transfer block 

13H 

AHOLD 

temporary storage for A register 

13S 

CJHOLD 

temporary storage for 0 . register 

13b 

SECTOR 

^SECTOR^ = Db_„ 
lU 
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ORDINAL 

137-13fi 

13T 

mo 

mi 

mE-m3 

mM 

ms-SME 


NAPE 

CnNXIT 

EXTSUT 

SAVEA 

SECTEn 

TEMP3 

PROCCT 

INPUT 


USE: 

address of common exit routine 

non-zero if processing External 
block 

temporary storage 

sector number of CREPl table 
storage on mass memory temporary 
storage 

temporary storage 

number of words of command 
sequence in the program being 
loaded 

input buffer 


Many of the constants in the Constant Table may be used by a 
subprogram in a manner other than that indicated by the Table 
of Contents* If sot an indication will be made in the main- 
tenance documentation of the subprogram* 

1*E*S Exit from LOADl 

Exit from LOADl is made with the following instruction: 

LABEL OPCODE ADDRESS REMARKS 

EXT BRANCH 

JMP BRANCH 


AA 3777 


PHIMTTO IN USX 



Arden 

Hill 

CONTROL DATA CORPORATION 
s Development 

DIVISION 

AUG I) 1971 

noruMF-NT ri 

IMS 



, PAGE NO. 

00067 

pRnnur.T namf 

170D 

I1S0S bSK Special 

System 



PKODUCT MODEL NO 



MACHINE SERIES 

170D 


1.3.0 BRNCHl 

The bits 0-3 of the location AINPUT determines the branching 
which occurs- According to the type of operation requested 
by the program calling the Loader n branching will occur to one 
of the eight locations labeled as follows! 

relocatable binary load 

set bases function 

link program entry points 

link to crepl table 

build crepl table 

link to crep table 

print memory map 

print unpatched externals 

1-3-1 Constant Table Storage Referenced by BRNCHl 

NAME USED IN DOCUMENTATION STORAGE POSITION IN 

CONSTANT TABLE 


RBLOAD 

STBASE 

LNKENT 

LNCRP 

BLDCRl 

LNKCRl 

MAPS 

PRNEXT 



AINPUT 

BINASC 

BLANKS 

BLKCTR 

COMBAS 

CONVRT 

DATBAS 

INPCTR 

INPUT 

INPXCO 

INPXCl 

INPLUN 

PRINT3 

PRINTM 

PRINTS 

(3INPUT 

SUL 

TABSCH 

PROBAS 

PARBAS 

MSDbJCT 

STRSEC 


IDl 

SI 

la 

B7 

1 

2 

IS 

m? 

S7 

sa 

lis 

SM 

IS 

SI 

IDS 

sa 

3 

131 

13^ 

13-3 
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name; 

USED IN 

DOCUMENTATION STORAGE POSITION IN 

CONSTANT TABLE 


IGNORE 

111 


SAVEA 

ma 


XI T 

131 


MASINP 

1D7 


EXTSTR 

iia 


INPURD 

ID 


CS(3SEC 

laa 


LINBUF 

m? 


BLKCTR 

a? 


NOTLNK 

1 (a 


EXTCTR 

7 

1.3-a The 

usage of constants storage is as follows: 

1. 

AINPNT 

contains the logical unit number of the input 
unit if a relocatable binary program is being 
loaded in bits 3-lS and the type of loading 
operation in bits 0-3. AINPUT is used to deter- 
mine the type of load operation. 

E. 

BINASC 

contains ASCII code for four hex digits of 



entry point address. 

3- 

BLANKS 

contains two spaces. 

M. 

BLKCTR 

is used for a loop control. 

5. 

COMBAS 

if COMBAS equals zero there is no common storage. 

b. 

CONVRT 

is the address of a jump to convert. 

7. 

DATBAS 

is zero if no data storage is used. 

a. 

INPCTR 

is used to address location of command sequence 
storage. 


INPUT 

is the address, of the input buffer. 

10. 

INPXCO 

is the address of the input buffer. 

11. 

INPXCl 

is the address of INPUT +1. 

la. 

INPLUN 

is the logical unit number for input device. 

13. 

PRINT3 

is used to print an error message. 
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m. 

PRINTM 

IS. 

PRINTE 

li b . 

(3INPUT 

17. 

SWb 

la. 

TABSCH 

n. 

PROBAS 

EO. 

PARBAS 

El. 

USDldCT 

EE. 

STRSEC 

E3. 

IGNORE 

EM. 

SAVEA 

ES. 

XIT 

Eb. 

MASINP 

E7. 

EXTSTR 

Ea. 

INPURD 

ST. 

CSC3SEC 

30. 

LINBUF 

31. 

NOTLNK 

. 

ru 

m 

EXTCTR 


is used to print names and relocation bases for 
common block and data block* 

is used to print an error message and terminate 
the load. 

contains core address of the first of four 
sequential locations containing the base add- 
resses used by the loader to set limits. 

is used as a loop counter 

is the address of a jump to TABSCH. 

is the relocation base for the program currently 
being loaded. 

is address of start partition. 

is the number of words on mass memory. 

is the start sector of image of mass memory. 

is the flag to ignore duplicate entry points. 

is used as an exit parameter. 

is the address of a jump to CflNXIT- 

is the logical unit used for M])RIV. 

is the word address of the start of the external 
table. 

is used to address the first word of entry 
point table. 

is the start sector of command sequence image. 

is used to put blanks into input buffer. 

is a one if unpatched externals are found. 

points to next available location in external 
table. 
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1.3.3 Communication Region Constants Used by BRNCHl 

CONSTANT LOCATION 

1. ^7FFF MASKl = 

S. ordinal for mass storage 
device containing scratch 
area ^B3 

3. number of 1st sector in 
scratch and area on mass 
storage $C1 

•4. ordinal for mass storage 
device containing Program 
Library and Program Library 
Directory ^CB 

S. address for return to 
monitor 

L. entry to operating system $FM 

7. ordinal for standard input 

device for system ^FT 

a. address of system Library 

Directory $EB 

1.3.M Entrance to BRNCHl 

The BRNCHl routine is entered directly from CONBAS of the LOADl 

routine. The BRNCHl is entered by the following instruction: 

LABEL OPCODE ADDRESS REMARKS 

JMP BRANCH 

where the name BRANCH is declared as an entry point in the 

BRNCHl routine and as an external in the LOAD routine. 
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1.3.S RELOAD - Relocatable Binary Loading 

The Loader selects the input device for the Relocatable Binary 
Load Operation according to the information in bits M-IS of 
the location in the constant table. The name of this location 
is AINPUT. The Loader will do one of the three steps below 
in order to select an input device: 

1. If bit IS of AINPUT is a 1-, bits H-IM of AINPUT are 
ignored and - 

a> the address is placed in INPLUN-j and 

b> the location INPLUN+1 is set to a S. 

The input device selected in this case is the standard 
input medium for the system- The location con- 
tains the ordinal for this device. 

S. If bit IS of AINPUT is a □ and bits = -C^B3> then - 

a> the address ^^B3^ is placed in INPLUNt and 
b> the location INPLUN+1 is set to a S. 

The input device selected in this case is the scratch 
unit for the system. The location ^B3 contains the 
ordinal for this device. 

3- If bit IS of AINPUT is a 0 and -C^B3> ^ bits M-m of 
AINPUTn bits M-m of AINPUT contain the ordinal for 
the input device such that - 

a> bits M-m of AINPUT are recorded in bits 0-10 
of INPLUN-, and 

b> the location INPLUN+1 is set to □. 

The locations INPLUN and INPLUN+1 are located in the constant 
table. The contents of INPLUN and INPLUN+1 become the ^L^ and 
^A^ parameters to be inserted into a parameter list for the 
read requests made by the LIDRVl subroutine. 

If the input device selected by RELOAD is the mass storage 
device containing the scratch areai the location PROSEC is 
set to the sector number •^or the 1st sector in the scratch 
area- If the input device is a mass storage uniti it is be- 
cause the Loader Operation involves load-and-go input and the 
1st sector in the scratch area is the start of the programs 
to be loaded- The location PROSEC is in LIDRVl. If the input 
device is not a mass storage unit this location contains zero. 
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Next a return jump is made to the beginning of the routine 
which performs the actual loading operation. The name of this 
routine is LOADRl. The name LOADER is declared as an entry 
point within the LOADRl routine and as an external in the 
BRNCrili routine. 

1.3. L Exit from RBLOAD 

The following occurs upon exit from RBLOAD: 

The location ^EE contains the address for returning from 
the Loader to the monitor. This address is recorded in 
the second word of a E word return jump instruction using 
absolute addressing. The label assigned to the 1st of 
the E locations containing this instruction is LDXITl. 

1.3.7 NAPS 

The sequence of code for this branch begins at the location 
whose name is HAPS. A memory map consists of a listing of the 
contents of each loader table entry which contains an entry 
point name and an entry point address. It will be necessary 
to transfer an entry point name to the 1 ine-o f-pr in t buffer. 

The entry point address which consists of a lb bit number 
must be converted to the ASCII code for M hex digits before 
it can be stored in the 1 ine-of-pr in t buffer. The routine 
to cause this conversion has as its entry point a location 
named CONVRT. 

The format for a line of print is as follows: 

ENTRY POINT TABLE: 

SSSSmmmCOHSSHHHH 

SSSSmmnDATSSHHHH 

SSSSXXXXXXSShhhhSSSSXXXXXXSShhhhSSSSXXXXXXSShhhhSSSSXXXXXXSS 
etc. 
where : 


each 

0 

X 

0 

represen ts 

an 

alphanumeric character! 

each 


represen ts 

a 

hexadecimal digit! 

each 


represen ts 

a 

space! and 
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the address for an entry point name appears immediately 
to the right of the name. 

The line ^SSSSw^wCOnSShhhh^ is printed to indicate the Common 
Storage Relocation Basen and is omitted if there is.no common 
storage block reservation. The line ^SSSS«««D A TSShhhh^ is 
printed to indicate the Data Storage Relocation Base and is 
omitted if there is no data storage block reservation. 

1.3.6 Exit from MAPS 

Exit from MAPS is made as follows: 

1. The location $EE contains the address for returning 
from the Loader to the monitor. This address is 
stored in the second word of a E word jump instruc- 
tion using absolute addressing. The label assigned 
to the 1st of the E locations containing this instruc- 
tion is LDXITl. 

E. The exit parameters are placed in the A n (3 a I 
register as follows: 

□ — ^ A 

□ — > (3 

3. A return jump to the monitor is made from LDXITl. 

1.3. T Subroutines Used by and External to BRNCHl 

Subroutines used by and external to the BRNCHl. subprogram 
are as follows: 

PRINT3 
PRINTM 
PRINTS 
CONVRT 
CDRIV 
I1DRIV 
LDRIV 
LOADER 
DISKRD 

1. 3. ^.1 PRINT3 

PRINTS is used for printing error messages on the list out- 
put device. Prior to entering PRINT3 t the ASCII code for 
the error message is placed in the A register. The infor- 
mation placed in the A register consists of either E 


S(3UEEZ 

PATCH 

URTOUT 

PRINTb 

STBASE 

LNKENT 

LNKCRI 

BLDCRI 
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characters or of 1 character followed by a space. Entrance 
is made to the PRINT3 subroutine with tine following 
instruction : 


LABEL 

OPCODE 

ADDRESS 

REMARKS 


Et3U 

PRINT3-CS4} 



RTJ- 

PRINT3nI 



The output device used by the PRINT3 subroutine is the 
standard list device for the System. This is the device 
whose equipment table ordinal appears in the communication 
region address 

1.3. H.E PRINTM 

The PRINT4 routine is used by MAPS to print the names and 
relocation bases for common and/or data storage reservation 
while listing the entry point table. Prior to entering 
the PRINT4 subroutinen the A register is set to the binary 
value for the address to be printed and the Q register is 
set to the 1st word address of the output area. -CThe PRINT4 
subroutine will cause the value in the A register to be 
converted to the ASCII code for 4 hex digit and recorded 
in the output area.} The PRINT4 subroutine is entered by 
• execution of the following instruction: 

LABEL OPCODE ADDRESS REMARKS 

E(3U PRINT4-CH4} 

RTJ- PRINT4-.I 

The output device used by the PRINT4 subroutine is the 

same as that used by PRINT3. 

1.3. G.3 TBSCHl 

Given the storage area for a L character namen the TBSCHl 
subroutine is used to search for this name in the Loader 
Table. Prior to entering the TBSCHl subroutinen the loca- 
tion INPCTR is set to the 1st word address of storage for 
the given L character name. Upon exit from TBSCHl - 

a. if no Loader Table entry had been encountered with 
a name to match the given namen then - 

•— 0 ^ -CSUL} 
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b. If a Loader Table entry with a matching name had 
been locatedn then - 

□ ^ -CSULT 

Entry to TBSCHl is made by execution of the following 
instruction: 


LABEL OPCODE ADDRESS REMARKS 

RTJ- TBSCHiI 

1.3.T.M TBSTRl 

The TBSTRl routine is used to enter a name and address into 
the Loader Table. Prior to entering the TBSTRl routine - 

a. the location INPCTR is set to the 1st word storage 
address of a given b character namei 

b. the location ENTPMT contains the address for this 
namen 

c. the location Sliib is either - 


1. set to zero if the given name is an entry pointn 
or 


E. set to a -0 if the given name is an external. 

1. 3.^.5 CNVRTl 

The CNVRTl subroutine is used by MAPS to convert a lb bit 
binary number to the ASCII code for hex digits. The lb 
bit number to be converted is the entry point address from 
a Loader Table entry. Prior to entering CNVRTln the binary 
number is placed in the A register. Upon return from CNVRTli 
the locations BINASC and BINASC+1 contain the ASCII code 
for the M hexadecimal digits. 

CNVRTl is entered by execution of the following instruction: 

LABEL OPCODE ADDRESS REMARKS 

EC3U CONVRTIHO} 

RTJ- C0NVRT-.I 


NOTE: This subroutine is also used by PRINTM . 
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l.a.H.L LCDRVl 


The entry point for LCDRVl is CDRIV. LCDRIVl is the sub- 
routine used for I/O operations on the typewriter- Prior to 
entering the LCDRVl routinen the A register is at the 1st 
word address of the storage arean and either - 

1. the a register is set to the number of words for a 
write operation! or - 

E- the (3 register is set to zero for a read Operation- 

Entrance to the LCDRVl subroutine is made by execution of 
the following instruction - 


LABEL 


OPCODE 


ADDRESS 


RENARKS 


EXTn 

RTJ 


CDRIV 

CDRIV 


1.3.T.7 LHDRVl 




The entry point for LHDRVl is HDRIV - LHDRVl is the subrou- 
tine used for I/D operations on a mass storage device- 
Prior to entering LHDRVIt the A register is set as follows: 

1- lAI = starting address if the device to be used is 
the mass storage unit containing the scratch area- 

Alsoi prior to entering LMDRVln the d register is set as 
follows : 

1- I(3> = number of words if the operation is to read - 

S- -CO = one«'s complement of the number of words if the 
operation is to write- 

Entry to the LMDRVl routine is by execution of the following 
instruction : 


LABEL 


OPCODE 

EXT^^ 

RTJ 


ADDRESS 

riDRIV 

MDRIV 


REMARKS 


© 
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1.3.H.A LLDRVl 

The entry point for LLDRVl is LDRIV. LLDRVl is the sub- 
routine which is used for output on the standard list device 
for the system* Prior to entry to LLDRVli the A register is 
set to the starting address and Q to the number of words 
for the output operation* Entry to LLDRVl is made by execu- 
tion of the following instructions: 

LABEL OPCODE ADDRESS REHARKS 

EXT« LDRIV 

RTJ LDRIV 


l*3*‘l*'l LOADRl 

LOADRl is the common subroutine used by RBLOADn and LNKCRP 
to perform the functions of reading and processing reloca- 
table binary input blocks* Entry to LOADRl is made by 
execution of the following instruction: 

LABEL OPCODE ADDRESS REMARKS 

EXT« LOADER 

RTJ LOADER 

1*3*10 I/O FOR LOADER OPERATIONS 

There are four routines used by the Loader for I/O operations. 
Each of these routines is entered with a return jump to its 
1st word address* The name given to the 1st word address 
of each routine is declared as an entry point name for that 
routine. Alsoi the entry point name for the routine is 
referenced as an external within the subprogram elsewhere in 
the Loader requiring the use of this routine for I/O. 

Routines used for I/O operations expect in input parameters 
such information as the starting addressT number of wordsn 
starting sector if the device is mass storagei etc. These 
input parameters are passed to each of these routines through 
the A register! the Q register! the I register and certain 
prescribed locations in the constant table* A routine used 
by the Loader for I/O will insert each of these parameters 
into the appropriate spots within a parameter list* The 
format of this parameter list is that used for a formal I/O 
request! and it is headed by a return jump instruction: 

RTJ- 110} 

E(3U lOI^FM} 
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There are four routines used by the Loader for I/O operations- 
The entry point names are as follows: 

IDRIV 

CDRIV 

HDRIV 

LDRIV 
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l.M - □ LIDFx'Vl 


ThG routine whose name is LIDRVl is used to read either ASCII 


or binary formatted records 
records are those of the re 
by the 1700 Assembler. The 

l.M .1 Constant Table Storage Refe 


r om 

the 

input 

device . 

The binary 

ca ta 

ble 

binary 

format 

produced 

n try 

po] 

Int for 

LIDRVl 

is IDRIV. 

need 

by 

LIDRVl 




NAHE USED IN DOCUHENTATION 


STORAGE POSITION IN 
CONSTANT TABLE 


INPLUN 

AINPUT 

INPUT 


IIS 

101 

1M7 


The constants are 

used as follows: 


1. 

INPLUN 

is the name given to the 1st of 2 sequential 
locations which contain information pertaining 
to the logical unit number of the input device 

2. 

AINPUT 

contains logical unit number 


3. 

INPUT 

buffer use for I/O 



l.M-2 Communication Region Constants Used by LIDRVl 

CONSTANT LOCATION 


$7FFF 

^M2 = MASKl 

$&ooa 

$21 = MASK2 


1-M.3 Entry to LIDRVl 

The input parameters to LIDRVl are as follows^ 

1. IA> contains starting address. 

5. The information pertaining to the logical unit number 
for the input device is stored at the llSth and llLth 
locations in the constant table. The names for these 
locations are INPLUN and INPLUN+1. 

3. If the input medium is the mass storage devicen PROSEC 
and contains the sector number for the record to be 
read . 

M. -CC3} is zero if binaryi one if ASCII. 
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Entry 

is made to LIDRVl with 

the following 

instruction 

LABEL 

OPCODE 

ADDRESS 

REMARKS 


EXT« 

IDRIV 



RTJ 

IDRIV 


LIDRVl 

I/O Request 




The input parameters for the I/O requests are handled in the 
following way: 

1 . 5^tartinq Address 

The contents of the A register is recorded as the 
starting address- The starting address is recorded 
in the location specified by the parameter in the 
calling sequence- 

S - tJord Count 

Since LIORVl is used primarily to read relocatable 
binary records produced by the 17D0 Assembler! the 
value LO v^/ill be placed in the parameter list for 
the I/O request- The value LD represents the maximum 
size record that can be read~Trom the input device- 

3 . Mode 

If -C(3> is a one upon entry to LIORVl n the M parameter 
in the calling sequence is set for the ASCII mode of 
operation- If -C(3> is a zero upon entry to LIORVln 
the H parameter is set for the binary mode of operation 

^ • Logical Unit Number 

The information for the logical unit number by which 
the input device is referenced is taken from the con- 
stant table and inserted as parameters into the calling 
sequence- The contents of INPLUN is inserted as the 
]_ parameter and the contents of INPLUN+1 is inserted 
as the ^ parameter- 

The location in the parameter list reserved for the thread 
■Clabel = THREAD! contains a zero- The I/O request is issued 
by execution of the instruction preceding the parameter list- 
in this case it is an indirect request- 

RTJ- -CIO} 
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Once the operation is initiated! the location THREAD is set 
non-zero. The LIDRVl routine will wait in a loop until com- 
pletion occurs. Uhile the input operation is in progress! 
the location THREAD remains at a non-zero value. Upon com- 
pletion of the operation! THREAD is reset to a zero value. 
Also! IFLAG is set to a 3 bit value which reflects the state 
of the input operation upon its completion. 

Upon completion of the input operation! a status request is 
made. As a result of this status request! bits 4-10 of the 
d register will indicate whether the input device was or was 
not a mass storage unit. If the device had been a mass sto- 
rage unit! the sector number stored in PROSEC would have been 
increased by 1. 

Uhen loading CREP Table INPUT+Sfi and INPUT+SH contain next 
sector address of CREP Table. The last three words of the 
input block are cleared to zero before returning to the 
caller. The CREP table is a table of core resident entry 
points in PART 0. 

Also! as a result of this status request! the A register will 
contain the information pertaining to the hardware status. 

This information will be recorded at a location STATUS+1. 

If! upon completion of the input operation! bit E of the loca- 
tion IFLAG is a D! the operation is regarded as being error 
free . 

The A register is set to a minus zero value! and a jump is 
made to the exit from LIDRVl. 

If! upon completion of an input operation! bit E of the loca- 
tion IFLAG is a l! the input operation was terminated due to 
error. In this case! LIDRVl looks at bit ^ of the hardware 
status information stored at STATUS+1. If bit T=D! it is 
assumed that an unreco verable error condition such as parity 
exists as a result of the read operation. The A register is 
set to a D! and a jump is made to exit from LIDRVl. If bit 
H 0! an error condition due to motion failure has occured. 
The A register is set to +1 to indicate the alarm condition 
and a jump is made to the exit from LIDRVl. 

1.4.5 Exit from LIDRVl 

Exit from LIDRVl is made by execution of the following 
instruction : 

LABEL OPCODE ADDRESS REMARKS 

JMPm IIDRIVI 
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1.5.0 LCDRVl 

The routine whose name Is LCJ)RV1 is used for either Input or 
output operations on the communication device. The entry 
point for LC])RV1 Is CDRIV- 

1.5.1 Entry to LC])RV1 

The Input parameters to LCDRVl are as follows: 

1. The A register contains the starting address. The A 
register Is always assumed to be positive by the 
LCI5RV1 routine. 

2. The word count Is In the Q. register If LCDRVl Is to 
perform an output operation. The 0. register Is 
otherwise zero. 

Entry to LCDRVl Is made with the following Instructions: 

LABEL OPCODE ADDRESS REHARKS 

EXTm CDRIV 

RTJ CDRIV 

1.5.2 LCDRVl I/O Request 

The Input parameters for the LCDRVl requests are handled In 
the following way: 

1 ■ Starting Request 

The starting address In the A register Is recorded In 
the location specified by the S parameter of the 
calling sequence. 

2. Request Code 


If the Q register Is non zeron the request code In the 
calling sequence Is set for an output operation. If 
the Q register Is zero-* the request code Is set for 
an Input operation. 

3 . (iJord Count 

If the 0. register Is non zeron It Is assumed by LCDRVl 
to be positive. The value In the (2 register Is then 
Inserted Into the parameter list In the calling 
sequence as the N parameter. If the (2 register Is 
zeroT a value of LD Is Inserted Into the parameter 
list as the N para\meter. 
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The location in the parameter list reserved for the thread 
{label = THREAD} contains a Q. The I/O request is issued by 
execution of the instruction which proceeds the parameter list - 

RTJ- {10} 

Once the operation beginsn the location THREAD is set to a 
non zero value- The LCDRVl routine will wait on a loop until 
completion occurs- While the I/O operation is in progressn 
the location THREAD will remain at a non zero value- Upon 
completion of the operation-i the location THREAD will be reset 
to zero- Alsoi upon completion of the I/O operation! the 
location CFLAG is set to a 3 bit value which reflects^ the 
state of the I/O operation upon its completion- 

If the operation was for output! the status is ignored- The 
A register is set to a minus zero value! and a jump is made 
to the exit from LCDRVl- If the operation is error free- The 
A register will be set to a minus zero! and a jump will be 
made to the exit from LCDRVl- If bit S of the location CFLAG 
is a l! the operation was terminated due to an unrecoverable 
I/O error- The A register will be set to a zero! and a jump 
will be made to the exit from LCDRVl - 

l-S-3 Exit from LCDRVl 

Exit from LCDRVl is made by execution of the following 
instruction : 

LABEL OPCODE ADDRESS REHARKS 

JHPm {CDRIV} 
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l.b.D LHDRVl 

The routine whose name is LMDRVl is used for either input or 
output operations on the mass storage device. 

l.b.X NAME USED IN DOCUflENTATION • STORAGE POSITION IN CONSTANT 

TABLE 

PRINTE 5T 

HASINP 107 

Constant Storage is Used as Follows: 

PRINTS print error message 

MASINP contains logical unit for LMDRVl 

1 . (a . E Communication Region Constants Used by the LMDRVl Routine 

CONSTANT LOCATION 


^SDOO 


^E1 = MASKS 
$FM = 10 


l.b.3 Entry to LMDRVl 


The 

entry 

poin 

t 

for LMDRVl is 

MDRIV. 

The 

input 

para 

me 

ter to LMDRVl 

are as f 


1. 

The 

A 

register con 

tains the 


E. 

The 

a 

register is 

positive 



for 

r 

eading from m 

ass stora 



if 

th 

e operation i 

s for wri 



va 1 

ue 

for the (3 re 

gister re 


ol lows : 

starting address. 

if the I/O operation is 
gea and it is negative 
ting. The absolute 
presents the word count. 


3. 


The location SECTNO contains the number for the 
starting sector. 


ERRORS 


Error message generated by LMDRVl is El. 

Entry to MDRIV is made with the following instructions: 
label opcode address REMARKS 


EXT« MDRIV 

RTJ MDRIV 
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1 .( 3 . 4 LI1DRV1 I/O Requests 

The input parameters for the I/O requests are handled in the 
following way: 

1 . Starting Address 

The starting address in the A register is recorded 
in the location specified by the S parameter in the 
calling sequence. If lA} is negativen the one^s 
conrplement of A is recorded. 

2 . Request Code 

If a is positive! the request code is set for a 
read operation. If Q is negative! the request code 
is set for a write operation. 

3 . Uord Count 

If Q is positive! the value in Q is stored in the 
parameter list of the calling sequence as the M 
parameter. If ^ is negative! the one^s complement 
of the value in Q is recorded as the N parameter. 

Prior to issuing the I/O request! the location in the parameter 
list reserved for use as a thread Ilabel = THREAD! contains 
a zero. The I/O request is issued by execution of the instruc- 
tion preceding the parameter list - 

RTJ- 110} 

Once the operation begins! the location THREAD is set to a 
non-zero value. The LMDRVl routine will wait in a loop until 
completion occurs. 

While the I/O operation is in progress! the location THREAD 
remains at a non zero value. Upon completion of the operation! 
the location THREAD is reset to 0. Also! upon completion of 
the operation! a jump is made to exit from LMDRVl. 

1 . L . S Exit from LMDRVl 


Exit from LMDRVl 
instruction : 

is made 

by execution of 

the following 

LABEL 

OPCODE 

ADDRESS 

REMARKS 


JMPn 

IMDRIV} 
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1.7. D LLDRVl 

The routine whose name is. LLDRVl is used for output on the 
list device- 

1.7.1 Entry to LLDRVl 

The entry point for LLDRVl is LDRIV. 

The input parameters to LLDRVl are as follows: 

1- The A register contains the starting address. The 
A register is assumed to be positive by the LLDRVl 
routine- 

S- The (2 register contains the word count. The (2 

register is assumed to be positive by the LLDRVl^ 
routine. 

Entry is made to LLDRVl with the following instructi ons : 

LABEL OPCODE ADDRESS REMARKS 

EXTm LDRIV 

RTJ LDRIV 

1.7. E LLDRVl I/O Requests 

The input parameters for the I/O requests are handled in the 
following way: 

1- Starting Address 

The starting address in the A register is inserted 
into the address specified by the S parameter in the 
calling sequence - 

S- liJord Count 

The word count in the (3 register is inserted into the 
parameter list of the calling sequence as the N 
parameter. 

Prior to issuing an I/O requesti the contents of the location 
in the parameter list word reserved for use as a thread 
•C label = THREAD! contains a zero. The I/O request is issued 
by execution of the instruction which preceeds the parameter 
list - 


RTJ -CIO! 


AA 3777 


PRINlin IN USA. 



AUG Q 1971 


CONTROL DATA CORPORATION 


ArcJe^n Hillr. I)ny(- hjpmrent DIVISION 

TMc 00087 

DOCUMENT ri ASS ins page NO 

PRODUCT NAMF 1700 flSOS U5K Special System 


^0^ I — -■■■-—I------- — - ■ , - r ,,^, , 

(' } PRODUCT MODEL NO MACHINE SERIES 


Once the operation is initiated! the location THREAD is set 
to a non zero value. The LLDRVl routine will wait in a loop 
until completion occurs. While the I/O operation is in 
progress! location THREAD remains at a non zero value. Upon 
completion of the operation the location THREAD is reset to 
zero. Also! upon completion of the operation! an exit is made 
from the LLDRVl routine. 


1.7.3 Exit from LLDRVl 

Exit is made from LLDRVl by execution of the following 
instruction : 

LABEL OPCODE ADDRESS REMARKS 

JMP« TLDRIVI 


1-7.4 Subroutines Accessed Via Constant Table 



The last paragraph of item 1-S.3 describes how a subrouting 
may be accessed from any other routine in the loader with 
a return Jump to a location in the constant table. The 
subroutines accessed in this manner are as follows: 


ADJOVF 

CONVRT 

TABSCH 

TABSTR 

PRINT3 

PRINTB - STOP 

PRINTM 

PRINTS 

LINKl 

CMNXIT 

NXTBLK 
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l.fi.o ADJOFl 

The ADJOFl is a subroutine which performs lb bit address 
ar i thme tic . 


l.fl.l Constant Table Storage Referenced by ADJOFl 

NAMES USED IN DOCUMENTATION STORAGE POSITION IN 

CONSTANT TABLE 


PRINTS 


BGRLSU 


ADJXIT 

fil 

INPREL 

11 


USAGE OF CONSTANT TABLE BY ADJOVF. 


PRINTS is used to print error message. Error message 

from this routine is an ET. 

BGRLSU upper bit is set if there is backwards 

relocation . 


ADJXIT is used to exit from ADJOFl. 

INPREL contains relative flag for a word of command 

sequence storage. 

1 . fl . E Entry to ADJOFl 

Prior to entry to the ADJOFl subroutine! the two operands 
for the address arithmetic are placed in the A and Q register. 
Entry to the ADJOFl subroutine is made with the following 
instruction : 


LABEL OPCODE ADDRESS REMARKS 

RTJ- ADJ0F-.I 

l.fl.3 Address Arithmetic 

This subroutine is used primarily to add the relative value 
for a relocatable address to a relocation base.. Upon entry 
to ADJOFln the A register contains the relocatable address 
in bits Q-ISt and the Q register contains the relocation 
base. Upon exit from ADJOFi bits 0-lS of the A register 
contain the lb bit result for the address arithmetic together 
with the original setting for the sign bit. 
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l.fl.H Address Arithmetic for Positive Address Relocation 

The address arithmetic for positive address relocation is: 

relative value + relocation base - absolute value 

A zero relocation flag means absolute relocation- 

There will be no negative address relocation since it cannot 
be implemented with lb bit arithmetic. 

l.fi.S Exit from ADJOFl 

Exit is made from the ADJOFl subroutine with the following 
instruction : 

LABEL OPCODE ADDRESS REMARKS 

JMP- ADJXITnl 

Z(2U ADJXIT-Cflll 
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l.T.Q CNVRTl 

The CNVRTl routine is used to replace a It bit binary number 
with the ASCII code for 4 characters representing the digits 
of the equivalent hexadecimal number. 

l.H.l Constant Table Storage Referenced by CNVRTl 

NANES USED IN DOCUHENTATION STORAGE POSITION IN 

CONSTANT TABLE 


BINASC 

SI 

AHOLD 

13L 

HEX 

LS 

CNVXIT 



Constant storage is used as 


f ol lows : 



1. BINASC 


consisting of E wordsn 
ASCII code for exactly 
senting hex digits. 


is filled with the 
4 characters repre- 


a. AHOLD 


is used to hold the bits for 
number during the conversion 


the binary 
process . 


3. HEX 


i s 
in 
con 
sen 


the beginning of lb consecutive locations 
the constant table. End of these locations 
tains the ASCII code for a character repre- 
ting a hexadecimal digit. 


4. CNVXIT is used for exit from CNVRTl- 

l.^.E Entry to CNVRTl 

Prior to entry to CNVRTli the A register is set to the binary 
number for which the ASCII output for the equivalent hexa- 
decimal number is to be generated. Entry is made to CNVRTl 
by executing the following instruction: 

LABEL OPCODE ADDRESS REMARKS 

RTJ- CNVRTiI 

1.^.3 CNVRTl Operation 

Upon entry to CNVRTIt the A register contains a IL bit binary 

O number. This number is held in AHOLD during the CNVRTl 

operation. The CNVRTl will extract 4 bits at a time from 
I this number and replace them with the ASCII code for one of 
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the hexadecimal digits- The four bit bytes are processed 
in a left to right order- The M ASCII correspond ing to these 
bytes are stored in 2 consecutive wordsn E to a word- 


A register: 


HEXDIG 

HEXDIG+1 


IS IE 11 a 7 ^ 3 D 


byte 1 

byte E 

byte 3 

byte 4 


IS a 7 0 


HEXl 

HEXE 

HEX3 

HEX4 


l-T-4 Exit from CNVRTl 


The exit is made from CNVRTl by execution of the following 
instruction : 


LABEL OPCODE ADDRESS REMARKS 

jnP- CNVXITiI 

1-T-S Subroutines Used by and Internal to CNVRTl 

GETHEX is used by CNVRTl to replace a 4 bit byte 

in a binary number with the ASCII code for 
a hexadecimal digit- The contents of AHOLD 
are shifted left circular 4 upon entry to 
GETHEX- Bits 0-3 of AHOLD are placed in the 
A register- GETHEX will replace this value 
with the correspondin g hex digit and a trans- 
fer is made to the exit- 

GETHEX is entered with a return jump to the 
location by that name. 
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1.10.0 LSTOn 

There are five routines used by other subprograms of the 
Loader as standard routines for output operations on the 
standard list device for the system. The five subroutines 
are : 

PRINT3 

PRINTS 

PRINTM 

PRINTS 

PRINTb 

1.10.1 PRINT3 

PRINT3 is a subroutine used for printing error messages. 

The error messages consist of the letter E followed by 1 
or S hexadecimal digits. Operation within the Loading Pro- 
cedure may be resumed immediately following the error message 
output. 

1.10.1.1 Entry to PRINT 3 

Prior to entering PRINT3 t the A register is set to the ASCII 
code for two hexadecimal digits. -Clf a number for an error 
message contains only 1 digiti the digit will be in bits 
fi-lS of A. Bits 0-7 of A contain the ASCII code for a 
space.! PRINT3 is entered with the following instruction: 

LABEL OPCODE ADDRESS REMARKS 

RTJ- PRINT3iI 

l.lO.l.S Error Message Output 

Upon entry to PRINT3 the A register is stored at COMSCE+1 
while the ASCII code for a space and the letter E is stored 
in COMSCE. The 1st word address of the error message out- 
put = ^COMSGE^ is placed in the A register. The length 
of the message is placed in the d register. A return trans- 
fer is made to the routine LLDRVl where the address LDRIV 
is declared as an external. 

1.10.1.3 Exit from PRINT 3 

Exit from the PRINT3 routine is made with the following 
instruction : 
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LABEL 


OPCODE 


ADDRESS 


REMARKS 


jnp- 

E(3U 


PROXITiI 

PR3XIT-CS3} 


l.lO.l.R Subroutines Used by and External to PRINT3 


LDRIV 


I.IO.E PRINTS 


is used for output on the list device. This 
routine is entered with a return jump to its 
entry point whose name is LDRIV. 


PRINTS is a subroutine used for printing error messages. The 
error message consists of the letter E followed by S hexa- 
decimal digits. The Loading Operation is terminated by en- 
trance to PRINTS. 

I.IO.S.I Entry to PRINTS 

The A register is set prior to entering PRINTS in the 
same manner as described for PRINTS. Entry to PRINTS is 
made with the following instruction: 


LABEL 


OPCODE 


ADDRESS 


REMARKS 


JMP- 


PRINTS-.I 


l.lO.S.S Error Message Output 

Immediately upon entry a return transfer is made to PRINT3 
to print the error message. Upon return from PRINTSi a 
jump is made to the address whose name is STOP. At STOPt 
the A register is made-0 and the Q register is set to 

1.10.S.3 Exit from PRINTS 



Exit is made from STOP with the following instruction: 
LABEL OPCODE ADDRESS REMARKS 

JMP- CMNXIT-iI 

where the name CMNXIT is declared as an entry point in 
the LOAD routine. 
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I.ID.E. 

M Subroutines 

Used by and 


PRINT3 

which is 
with a re 

1.1D.3 

PRINTM 



The PRINTM subroutine is 
of a L character name and 
The format is as follows: 


Internal to PRINTE 

entered for error message output 
turn jump to the address = S1+II}. 


used to print a message consisting 
a M digit hexadecimal address. 


SSSSXXXXXXSShhhh 


where - 

S - space 

X - alphanumeric character! and 
h - a hexadecimal digit. 

1. ID. 3-1 Constant Table Storage Referenced by PRINTM 

NAMES USED IN DOCUMENTATION STORAGE POSITION IN 

CONSTANT TABLE 


CONVRT 

BINASC 

PR^XIT 


TO 

SI 

T3 


The constants are used as follows: 


1. BINASC 


S. PRMXIT 


3. CONVRT 

1.1D.3.E Entry to PRINTM 


locations are used for storage of hex di- 
gits after number conversions have binary 
to ASCII. 

is used to exit from PRINTM. 

is used to convert hex word to ASCII. 


Prior to entering PRINTMn the Q register is. set to the 
ASCII starting address for the message. The A register 


contains the binary 
for the M remaining 
is entered with the 


number to be converted to 
characters of the output, 
following instruction: 


ASCII code 
PRINTM 
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LABEL OPCODE ADDRESS REMARKS 

RTJ- PRINTM-,1 

1.10.3.3 Output Message Generation 

The address in is placed in temporary storage. The 
binary number in A is converted to the ASCII code for M 
hex digits by a return jump to CONVRT routine. Upon 
return from the CONVRT routinen the locations BINASC 
and BINASC+1 contain the ASCII code for the number- 

The hex digits in BINASC and BINASC+1 are placed in the 
7th and flth words of the output area. The first word 
address of the output area is placed in the A register. 

The number of words to be printed is placed in the Q 
register. A return jump is made to the LDRIV routine 
for message output. Upon return from LDRIV a jump is 
made to the exit from the PRINT4 routine- 

1.10.3.4 Exit from PRINT4 

Exit from PRINT4 is with the following instructions: 

LABEL OPCODE ADDRESS REMARKS 

JMP- PR4XIT-.I 

E(3U PR4XIT-n3} 

1.10.3.5 Subroutines Used by and External to PRINT4 

CONVRT is used to convert a IL bit binary number 

to the ASCII code for 4 hex digits. This 
routine is entered with a return jump to 
the address = TD+CI> 

LDRIV is used to print a message on the list device. 

This routine is entered with a return jump 
to LDRIV where LDRIV is declared as an 
external. 

1.10.4 PRINTS 

The PRINTS routine is used to print a six character name- 
1.10.4.1 Constant Table Storage Referenced by PRINTS 


AA 3777 


PRIKTHED IN USA. 


o 


o 


CONTROL DATA CORPORATION 

Ardon llillr. J)o Vf 2 1 o {3 mf;!n t 


DIVISION 


DOCUMENT CLASS 

PRODUCT NAME 

PRODUCT MODEL NO. 


ins 


17DD L5K Special Svir>tnm 


PAGE NO. 




0009B 


MACHINE SERIES. 


17fJU 


NAHE USED IN D OCUMEN TATION 


INPCTR 

PRSXIT 


STORAGE POSITION IN 
CONSTANT TABLE 

IS 

T7 


INPCTR 


PRSXIT 


contains the 1st word address for storage 
of the L character name to be printed. 


is used to exit from PRINTS. 


I.IO.H.E Entry to PRINTS 


Prior to entering PRINTSt the location INPCTR is set to 
the 1st word address for storage of the L character name 
to be printed. 

Entry is made to PRINTS with the following instructions 
LABEL OPCODE ADDRESS REMARKS 


RTJ~ 


l.lO.M.3 Output Message Generation 


PRINTS-iI 


The address in INPCTR is placed in the A register. The 
length of the output is placed in the C3 register CM words!. 

A return transfer is made to LDRIV where this name is refer- 
red to as an external address. A transfer to the exit 
from PRINTS is made upon return from LDRIV. 

1.10.^.^ Exit from PRINTS 

Exit is made from PRINTS with the following instructions 
LABEL OPCODE ADDRESS REMARKS 


JMP- 

Eau 


PRSXIT-,1 

PRSXIT-CT7} 


I.IO.M.S Subroutines Used by and External to PRINTS 

LDRIV is used to print the b character name 


iCO 
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I.IQ.S PRINTb is used to put the external name into the 

print buffer and print the external name on 
the list device. PRINTL use LDRIV to list 
the external name on the list device. 


l.lQ.b STOP is another routine in LSTOUT used by the loader. STOP 
sets -CAT and -£c3> to minus zero and exits by the following 
instruction: 


LABEL OPCODE ADDRESS REMARKS 

JMP- CMNXIT-,1 
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l.ll.D LINKll 

Instructions which roforGnee the samG external name are tied 
together by a string of link addresses. The assembler 
generates two words for each instruction that references 
an external name. Bits Q-IM of the second word of each 
instruction contains a link address which points to the loca 
tion containing the next link address in the string. The 
last location in the string contains a link address of $7FFF 
in bits 0-m . 


The LINKll subroutine will replace each of the link addresses 
in a string with the entry point address for the particular 
name. When $7FFF is encountered the link table is checked 
for an address of the $7FFF in the command sequence. If a 
match is found the $7FFF is not the end of the string and the 
search for the end of string continues as $7FFF is a pointer 
to the next link address. The link table contains the add- 
ress of any program relocation value that has been absolu- 
tized to $7FFF • 


1.11.1 Constant Table Storage Referenced by LINKll 


NAIIE USED IN DOCUMENTATION STORAGE POSITION IN CONSTANT 

TABLE 


ENTPNT 

LINK 

INPURD 

NGRLSlil 

PRINTB 

LKIXIT 

LNKSTR 

LNKCTR 


13 

m 

10 

T 

5 ^ 

103 

iia 

113 


1.11. a Constant Table Storage is Used as Follows: 


1 . 

ENTPNT 

contains the absolute 
point address in bits 

value 

0-lS. 

of 

the 

entry 

a. 

LINK 

contains the absolute 
address in a string. 

value 

0 f 

the 

1st link 

3. 

INPURD 

is used as temporary 
execution. 

s tora ge 

during 

program 
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4* NORLSU is set positive or negative prior to entry 

to LINKll. Determines whether patching is 
for absolute or relative address ing . 

S. PRINTS is used to print error messages. 

L. LKIXIT is used to exit from LINKll* 

7. LNKSTR contains the address of link table. 

fl. LNKCTR points to next available location in link 

table. 

1.11.3 Communication Region Constants Used by LINKll 

CONSTANT LOCATION 

$7FFF $42 = MASKl 

$aDDn $21 = MASKS 

Entrance to LINKll 

Both LINK and ENTPNT are set prior to entering LINKll. Prior 
to entry to LINKll the location NCRLSU is set either posi- 
tive or negative. The location NCRLSU is set with -CIINPCTRli 
= 2 characters of the name. LINKll is then entered with the 
following instruction: 

LABEL OPCODE ADDRESS REMARKS 

RTJ- LINKliI 

1 • 11 . S Patching 





Upon entry to the subroutine LINKlln the location LINK con- 
tains a link address and the location ENTPNT contains an 
entry point address. The address in LINK points to the 
1st location in a link address string. Each location in 
the link address string contains an address which points 
to the next location in the string. Bits'D-14 of the last 
location in the string are set to the value $7FFF. 

The address in LINK and ENTPNT are execution time addresses - 
they refer to locations in execution time core. Each of the 
addresses in a LINK address string is an execution time add- 
ress. If the contents of NGRLSU is positive! patching for 
the absolute mode of addressing will occur. 
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LINKll will replace the contents of every location in the 
string of the link addresses by the entry point address 
in ENTPNT. 

■CENTPNTI =^-CLINK> at bits O-m-, bit IS of -CLINK} is 

not changed 

■CINPURD} => -CLINK} 

If the contents of NGRLSliJ are negativen LINKll will replace 
the contents of every location in the string by a relative 
value. This value is the difference between the address in 
LINK and the entry point address. The following occurs: 

bits D-m of -CILINK}} INPURD 

-CENTPNT} ^ -CLINK} -CLINK} at bits D~15 

•CINPURD} ^ LINK 

LINKll will loop to process the next link address in the 
string. The procedure terminates when the contents of LINK 
•Cbits O-im is $7FFF- A transfer is made to the address 
stored in the entry point. 

NOTE: The LINKll operation may be referred to as patching. 

Patching -1 as illustrated aboven may be either relative or 
absolute. However-i the mode of patching is uniform for each 
location in the string of link addresses. 

1.11. b Internal Subroutines Used by LINKll. 

LNKCK compares link table entry to the address of the $7FFF 
link. If an equivalent address is foundi $7FFF is a pointer 
to the next link addressi otherwise it is the end of the 
string. If $7FFF is found to be the end of string an exit is 
made from LINKll through CMNXIT. 

1-11.7 Exit from LINKll. 


Exit is made 
instructions: 

from the LINKll 

routine using 

the following 

LABEL 

OPCODE 

ADDRESS 

REMARKS 


JMP- 

LKIXIT-.I 



E(3U 

LKIXIT-C103} 
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1.12.D LOADRl 


The func 

tions of 

the LOADRl routine 

are as 

f ol lows 



1. 

Read an 

input block. 





2. 

If I/O 

error occurs during 

input 

opera ti 

on T 

take 


appr opr 

iate action. 





3. 

Identify an input recordn 

and bra 

nch to 

the 

appr 0 


pr iate 

routine to further 

process 

input 

rec( 

Drd . 

M. 

If input record is unrecogn i za ble 

T take 

appr 

-0“ 


pr ia te 

action . 






1.12.1 Constant Table Storage Referenced by the LOADRl Routine 

NAME USED IN DOCUMENTATION STORAGE POSITION IN 

CONSTANT TABLE 



CSt3CTR 

DATBAS 

DATLIM 

INPXCO 

INPUT 

NXTINP 

PRINT2 

PRINT3 

SECTOR 

CSC3LIM 

PARBAS 

MSDUCT 

CSC3SEC 

STRSEC 


123 

2 

S 

57 

m? 

t,3 

5^ 

SM 

13fl 

b 

131 

13 ^ 

12fl 

133 


1.12.2 The constants are used as follows: 



1. 

CSC3CTR 

contains the load time limit address 
command sequence of all programs read 
prior to the current Loader Operation 

of the 
in 

2. 

DATBAS 

relocation base for data storage. 


3. 

DATLIM 

highest address of data storage +1. 



INPXCO 

contains the starting location of the LO 
word input area for storage of the reloca- 
table binary input blocks read by the Loader. 
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s. 

INPUT 

is the name for the first word address of 
LO sequential locations used as storage for 
relocatable binary input records read by 
LOADRl. 

L . 

NXTINP 

is used to get next block 

7. 

PRINT2 

is used to print error message. 

a. 

PRINT3 

is used to print error message 


CSc3Lin 

highest address of command sequence storage 
+1 ■ 

10. 

SECTOR 

contains the word count for a sector on mass 
storage. Uord count = 

11. 

PARBAS 

address of start of partition. 

12. 

nSDUCT 

number of words stored on mass memory. 

13. 

CS(3SEC 

starting sector of command sequence image. 

14. 

STRSEC 

start sector of image on mass memory. 


1-1E.3 Communication Region Constants Used by LOADRl 
CONSTANT LOCATION 

$7FFF = HASKl 

1.12.4 Entry to the LOAORl Routine 

LABEL OPCODE ADDRESS REMARKS 

RTJ LOADER 

where -- 

the name LOADRl is referenced as an external within the pro 
gram from which the return jump is madei and as an entry 
point name within the LOADRl routine. 

1.12.5 Reading Input Records 

At the location SldlAXCn the location SUl + 1 is set to the 
address ^SliJlA^. The' locations SUl and SlJl+1 contain a 2 
word jump instruction whose address is set during program 
execution. NOTE: In order to maintain the ^run anywhere^ 
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characteristics of the Loadern the location Slill contains 
a value of an SUl + 1 is set to the following IL bit 

value: 

SbJlA - SbJl - 1 

Input records to the Loader may be either binary formatted 
or ASCII formatted. All input operations are carried out 
in the binary mode. All ASCII formatted record used as 
Loader input must have an as the first character. The 

binary formatted records must be one of the L relocatable 
binary formats produced by the 1700 Assembler. 

li.lE.b Reading Relocatable Binary Input Blocks 

The LOADRl routine begins its input operation at the location 
NXTBLK. The Loader reads relocatable binary records or input 
blocks LO words in length from the input device. The LOADRl 
routine will read a formatted record in binary mode by doing 
the following: 

1. The LO word buffer for relocatable binary input 
is backgrounded to all ones. 

E. The A register is set to the starting address. 

3. The C3 register is set to zero for binary mode. 

M. A return jump is made to the IDRIV routine -Cwhere 

the address IDRIV is referenced as an external name>. 

Upon return from the IDRIV routinei the A register is set as 
follows: 

1. -CAT = -□ if the read operation is error free. A 
jump is made using the two word jump instruction 
Iwith the variable address! at SUl and Sli)l + 1. The 
jump is made to the address at which the processing 
for the input record begins. 

E. -CA} = 0 if the read operation were terminated due 

to an unreco verable error encountered while reading. 

A jump is made to the PRINTE error exit where the 
error indication ^El^ is printed and the Loading 
Operation terminates. 

3. -CAT = +1 if the read operation were terminated be- 
cause of the alarm condition. The alarm condition 
arises as a result of motion failure on the part 
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of the input devicG* A cause of thisn to cite an 
examplGn is trying to read paper tape when there 
is no tape in the reader* The significance of the 
alarm error is discussed in the next four para- 
graphs. 

A relocatable binary program consists of a sequence of 
relocatable binary records beginning with a NAN block and 
terminating with an XFR block. These sequential records 
must be stored on a continuous external mediumi i-e-i not 
split between E paper tapes* Therefore! once the loading 
of a relocatable binary program has beguni an XFR block 
must be read before an alarm condition is sensed. 

The alarm condition is acceptable to the Loader if the loading 
of a relocatable binary program has been completed by reading 
and processing its XFR block* The alarm condition is also 
acceptable after reading an ASCII input block* 

Prior to reading the 1st relocatable binary input blocki 
and subsequent to reading each XFR blocki the address for 
the jump instruction at SUl is set to SUlA * 

Therefore! an alarm condition is acceptable to the Loader 
if the delta in the second word of the jump instruction at 
SbJl is set as follows: 

•CSUl+1} = SUIA - SUl - 1 


or 


•CSUl+lI = SbJlC SUl - 1 

If either of these conditions is met a jump is made to the 
location whose label is ALARflOK* At ALARflOK! the ASCII code 
for ^mT^ is placed in the location INPUT! and the location 
INPUT+1 is set to a -0* A jump is made to SUIF* 

If neither of the above conditions is met! a jump is made 

to the PRINTE error exit where the error indicator ^El'^ is 
printed and loading terminates* 

1*1E*7 Reading ASCII Records from the Input Device 

Since ASCII records are read from the input device in the 
binary mode! they will not be processed as ASCII records 

unless the first character is an The ASCII records 

should not exceed lEO characters in length. For a maximum 
length record! the lEQth character is expected to be a 
carriage return. 
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The three steps involved in reading an ASCII record are the 
same as those in reading a binary record. Sequential ASCII • 
records need not occur on a continuous external medium. The 
records are read -C^mT carriage return^! or until the alarm 
condition arises. 

Refer to item I.IE.L for the procedure to be followed should 
an alarm condition arise. 

l.lE.fl Types of ASCII Records 

1. mT carriage return is an End of Load Statement. 

1.1E.1 Branching to Process an Input Block 

The contents of the first word in the input buffer determines 
branching. Branching is to process relocatable binary input 
and it is determined by the bits -CINPUTI 

IS 13. 


I.IE.ID SUIA 

The address in the switch 1 jump instruction is set to SUIA 
by Program in i tia 1 i za ti on . It is reset to SUIA each time 
an XFR block is to be processed. Uhile switch 1 is set to 
SUIA onlyn the NAfl blocks and ASCII input statements will 
be processed. The loader will transfer to the error exit 
PRINTE for all other blocks received at this time and gives 
you an E3. If the NAfl block is received! the loader will 
reset the jump address in SUl to SUIB and then jump to 
NAfIPRO -[refer to 1.13}. 

The address NAflPROi is feferenced as an external name by 
jump instructions within the LOAIRI Routine. 

l.lE.ll SUIB 

The address in the switch 1 jump instruction is set to SUIB 
whenever a NAfl block is processed. 

Uhile jump switch 1 is set. to SUIB the loader will process 
only the following block*. RBDt BZS t ENTi EXT and XFR. The 
loader will branch to RBDPR0-. BZSPR0-, ENTPROn EXTPRO and 
XFRPRO accordingly. The loader will jump to the PRINTE 
error exit each time a NAfli block is received while the SUl 
jump instructions within the LOADRl routine. 
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1.12.12 SUIC 

The address of jump instruction SbJl is set to SHIC whenever 
an EXT block is received by the loader. 

Uhile jump switch 1 is set to SUICt the loader will process 
only EXT and XFR blocks. All others will cause the loader 
to take the PRINTS error exit. 

1.15.13 SUIF 


Subsequent to the most recent return jump to LOADRli a 
jump will be made to SUIF either when an ASCII input state- 
ment is readi or when an alarm condition has arisen which 
is acceptable to the Loader. 

l.lS.m Exit from the LOADRl Routine. 

Exit from the LOADRl Routine -{other than exits due to error} 
is made whenever an ASCII input statement is read which is 
assumed by the Loader to be a monitor control statement. 

In this casei the A register is set to a value of -□ to 
indicate an error free exiti and the C3 register is set to 
address constant ^INPUT^ -{the beginning of storage for the 
ASCII control statement}. Exit from the LOADRl routine 
is with the following instruction: 

LABEL OPCODE ADDRESS REMARKS 

JMP -{LOADER} 

In the event it was necessary to take the PRINTS error exit-i 
the ASCII code for the error number is placed in the A 
register. A jump is made to the PRINTS error exit address 
in the following way: 

LABEL OPCODE ADDRESS REMARKS 

JMP- PRINTS-,1 

I.IS.IS Subroutines Used by and External to the LOADRl Routine 

1. PRINTS is used for error message output. Operation 

is terminated following printout. 

POSSIBLE ERRORS. 

'vO El 

E3 
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E. fIDRIV is used to ojrite command sequence storage 

onto mass storage. Alson it is used to write 
the Loader Table onto mass storage. 

3. IDRIV is used to read input records from the input 

device. 

The PRINTEn routine is entered via the entry point location 

in the Constant Table- 

IDRIV is entered with return jump to its entry point address. 
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1.13.0 NAI1PR1 


routine which is used to process NAN block. 

storage Referenced by the RAnPRl Routine. 

NAME USED IN DOCUilENTATION STORAGE POSITION IN 

CONSTANT TABLE 


NANPRl is the 
1-13.1 Constant Table 


1.13.E 


AINPUT 

BLANKS 

COfIBAS 

COfILin 

CS(3Lin 

OATBAS 

DATLin 

ENTPNT 

INPCTR 

INPUT 

PROBAS 

PROOAT 

PARLIfI 

ASAV 

BINASC 

INPXCO 

INPXCl 

INPXCC 

NXTINP 

PRINT3 

PRINm 

PRINTS 

(3INPUT 

PROGCT 

PROCOn 

PRINTE 

C3SA V 

SUb 


IDI 

la 

1 

b 

a 

s 

13 

IS 

m? 

3 

lao 

13E 

a*i 

SI 

s? 

sa 

ba 

b3 

5^ 

‘^ia 

loa 

14b 

lai 

ST 

30 

aa 


The constants 


are used as follows: 


1- AINPUT 
P- BLANKS 
3- con BAS 


contains one of 
for the current 
to item l.ai 


the entrance parameters 
Loader Operation. IRefer 


contains a constant used for 
generating an output message, 
seopo which is the ASCII code 


Gditing when 
IBLANKSl = 
for a spaces . 


contains the Common Storage relocation 


base . 
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4. COHLin 

5. CSC3Lin 

L. DATBAS 

7. DATLin 

a. ENTPNT 
INPCTR 


ID. INPUT 
11. PROBAS 

IB. C3SAV 
13. SUL 


contains the upper limit address of the com- 
mon storage reservation lequal to last add- 
ress + 1>. 

contains the execution time core upper 
limit address for the command sequence of 
the program whose NAI1 block is currently 
being processed. {This limit address is 
equal to 1 + address of last word of program 
at execution time.l 

contains the relocation base for the 
Execution Time Data Storage Block Reser- 
vation. 

contains the upper limit address {equal to 
last address +1> of the Execution Time Data 
Storage Block Reservation. 

contains the address which is to be inserted 
into the 4th word of a Loader Table entry. 

has B uses; 

a} It is used as an address counter during 
a core-to-core data transfer operation! 
and 

b> it is set to the 1st storage address 
for a name to be entered into the 
Loader Table. 

is the LD word buffer for storage of reloca- 
table binary input. 

contains the Execution Time Relocation Base 
for the program whose NAfl block is currently 
being processed. 

is used for temporary storage of operands in 
the (3 register. 

has two uses: 

a} It is initially cleared to zero. It is 

set to a -0 once an error condition arises 
due to overflow of available core. 
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b} AIsot it is usGci for making Loador Table 
entries. SUL is set to a 0 if the 
Loader Table entry is for an entry point 
name. It is set to a -□ if the table 
entry is for an external name. 


m. 

PRODAT 

non zero if protected data is delcared. 

IS. 

PARLin 

LUAD+1 of last partition 

lb. 

ASAV 

tempory storage for a register. 

17. 

BINASC 

temporary storage for words converted from 
binary to ASCII. 

la. 

INPXCO 

address of input buffer. 

n. 

INPXCl 

address of input +1. 

ao. 

INPXCC 

address of input ~3. 

ai. 

NXTINP 

used to get next block. 

aa. 

PRINT3 

used to print errors. 

33. 

PRINTM 

used to print b character name and R digit 
hexadecimal address. 

aM. 

PRINTS 

used to print a six character name. 

as. 

C3INPUT 

■CC3> is stored here upon entry to the Loader. 

ab. 

PROGCT 

number of words in program. 

a?. 

PROCOn 

non zero if protected common is declared. 

aa. 

PRINTa 

used to print error 


1.13.3 Entry to the NANPRl Routine 

The name NAhPRl is declared as an entry point name in the 
NAHPRl routine and is an external in the LOADRl routine. 

Entry to the NANPRl routine is with the following instruction: 

LABEL OPCODE ADDRESS RENARKS 

JNP NAflPRO 


AA 3777 


IN U&A. 


CONTROL DATA CORPORATION 
A r d 0 n H i 1] r: )> c; v r- 1 r> p tn f.» n t 


DIVISION 


ins 


DOCUMENT CLASS . 

PROr^UCT NAME I r" U U f I 0 S L 5 K Special S y b g m 


PAGE NO. 


AUG D 19/1 


(iOl I ! 


J PRODUCT MODEL NO. 


MACHINE SERIES. 


170D 


1.13.M Processing a NAM Block 


Common and data storage reservations are set aside when 
processing a NAf1 block* The base addresses for common and 
data storage are printed on the printer* In additionT the 
six character program name in the NAN block is printed on the 
printer together with the base address of the program. 


1*13*5 Reserving Common Storage 

The value equal to the number of words to be set aside for 
common storage is contained in the second word of the input 
buffern INPUT+1* If IINPUT+ll is zeroi common storage is not 
reserved* Insteadn the program transfers immediately to 
RAUPRl. 



I 



If IINPUT+1> is non zeron ICOflBASl is checked. Initially 
•CCOMBAS} contains zeron but once common storage is declared 
by a NAM block -CCOflBASl contains the relocation base of the 
common storage* If no common storage reservation had pre- 
viously been maden common storage will be reserved by setting 
COflBAS to a value equal to -CCOflLIfll - IINPUT+ll* This is 
otherwise defined as the difference between the upper limit 
of available core and the number of words in the common 
storage block. 

Once common storage has been reserved PROCOfl is checked to 
determine if common is protected. If PROCOfl is zero common 
is loaded in the last partition. If common is protected 
core overflow is ignoredi otherwise NAflPRl must check for 
overflow of available core* There will be overflow of avail- 
able core if the base address of common storage is not greater 
than the highest address used for command sequence storage: 

ICSc3Lin>-l2' -CCOriBASI 

If there is overflow of available coren a -0 will be stored 
in SbJb and a jump is made to NAflPRl where the NAM block is 
processed further* If E or more NAfI blocks to be processed 
declare common storagen the largest declaration of common 
storage should be in the first NAN block to be processed. If 
ICOriBASI is non zeroi the size of the common storage declara- 
tion in the current NAN block must not exceed the size of the 
original block reservation: 

IC0nBAS>+-CINPUT + l>-IC0f1Lin><0 

If this condition is meti a jump is made to NAMPRl to further 
process the NAfI block* If noti a transfer to DATERR which 
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transfGrs to PRNNAfl. PRNNAfl transfers to PRINTS which lists 
name and relocation. Upon return from PRNNAfln a jump is 
made to PRINTS to print the error indication ^EM^. 

1.13.U Reserving Data Storage 

Data storage is reserved by the sequence of code beginning 
at NAMPRl. The value equal to the number of words to be set 
aside for data storage is contained in the third word of the 
input buffern INPUT+5. If IINPUT+EI is zeroi no data storage 
is reserved. InsteadT the program transfers immediately to 
NAflPRS. 

If IINPUT + EI is non zero-, IDATBASI is checked. 

If IDATBASI is zero-, -CPRODATI is checked. 

If.IPRODATI is non zero it indicates Data is to be loaded 
in the partition. 

If IINPUT-J-SI is zero -CINPUT-f-3} is checked for command sequence. 

Once data is declared-, -fDATBASI is set to the execution time 
relocation base of data storage. Data storage is reserved by 
assigning available space in the command sequence storage: 

1. -CPROBASI > DATBAS 

E. -CDATBASI+-CINPUT+E} — DATLIfl PROBAS — ^ CSC2Lin 

In other words: 

1. DATBAS is set to the address which would have been 
the base address of the next program to be loaded 
had no data storage been declared. 

E. The last word address of data storage-fl becomes the 
base address of the next program to be loaded. It 
also becomes the upper limit of available core. 

Once data storage has been declared-, a check is made for the 
overflow of available core. If no common storage has been 
reserved-, the address in DATLIM must not exceed the highest 
address in core: 

■CDATLIfl} < PARLin if ICOMBASI = □ 
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If common storago has boon roservodT the address in DATLIH 
must not exceed the relocation base for common storage: 

■CDATLini £ -CCOnBASI if -CCOnDASI D 

If neither of these conditions holds trueT an error has 
occured due to the overflow of available core. A -D is 
stored in SULt and a transfer is made to NAHPRE to further 
process the block. 

Space is reserved in execution time core for the Execution 
Time Data Storage Block Reser va t i on : 

IPROBASI ^ DATBAS 

IDATBAS}- + -CINPUT + EI $>DATLin 

■CDATLini > PROBAS & CSC3LII1 

A check is made for overflow of unprotected core as a result 
of reserving data. Overflow occurs if: 

a> -CDATLin>> ICOnBASI for -CCOnBASI □ 

b> -CDATLin>> ICOnLini for ICOnBASI = □ 

c> IINPUT + BJ 0 and IDA TLIH >=-fC OH BAS > for ICOnBASI 0 

d} -CINPUT + 3> 0 and IDA TLIN > = IC OHLin > for ICOnBASI = □ 

where IINPUT+BI = length of program relocatable storage of 
this program. If overflow occurs a jump is made to OVFERl. 

At the location whose label is OVFERIt the location Sldb 
is set to a -On and a jump is made to NAHPRS to further 
process the NAM block. 

1.13.7 Reserving Command Sequence Storage - NAI1PRB 

Program Relocatable Command Sequence Storage is reserved 
by the sequence of coding beginning at NAHPRB. The value 
equal to the number of words to be set aside for program 
relocatable command sequence storage is contained in the 
fourth word of the input buffern If\lPUT + 3. If IINPUT + 3> 
is zeron it is assumed that there is no program relocatable 
command sequence storage for the relocatable binary program 
whose NAfl block is currently being processed. A transfer 
is made immediately to NAHPR3. 
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If IINPUT + 3> 5^ On then the program whose NAH block is currently 
being processed has an execution time upper limit address 
equal to 


IPROBAS} + -CINPUT + 3>. 

If the upper limit for this storage exceeds the upper limit 
of available coren an overflow error has occurred. The 
upper limit of core is either the common storage relocation 
base if common storage had been reservedn or the highest 
unprotected address in core+1 if no common storage had been 
reserved. overflow has occurred if either 

IPR0BAS> + IINPUT + 3> < ICOMBASI if ICOnBASI 0 


or 

IPR0BAS>+IINPUT+3> < IPARLItn if ICOnBASI = 0. 

If overflow occursn the location SbJL is set to a -On and a 
jump is made to NAMPR3. If no overflow occursn the execu- 
tion time upper limit for program storage is fixed in CSCLIM 
as follows: 

If •CCS(3Lin><IPR0BAS> + *CINPUT + 3>n IPROBASI + IINPUT + BI ->CS(3Lin. 

1. 13.fi NAnPR3 - Print Program Name and Execution Time Relocation Base 

A test is made to determine if the current Loader Operation 
is a Crep Table Load Operation. 'The program name and execu- 
tion time relocation base will not be printedn and a jump 
is made to the location OVFTST to test for core overflow. 

If the Loader Operation is not a Crep Loadn the name and 
execution time relocation base of the program whose NAM 
block is currently being processed! will be printed. The 
program name is recorded at the locations INPUT+Mn INPUT+S 
and INPUT+L. Spaces are recorded at INPUT+Et INPUT+3 and 
INPUT+7. The address ^INPUT + E^ is placed in the (3 register 
and the IL bit value = IPROBASI is placed in the A register. 

A return jump is made to the PRINTM routine to list the name 
and relocation base of the program. luring the operation 
of PRINTMt the IL bit binary number in A will be converted 
to the ASCII code for ^ hex digits. The M hex digits will 
be recorded in the output area at locations INPUT+fi and 
INPUT+R. The program name and execution time relocation 
base appear on a listing as 

SSSSXXXXXXSShhhh 
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where - 


1. 

S 

indicates 

a spacei 


3. 

X 

indica tes 

an alphanumeric character 

lA-Z} 



or -CD-D}-, 

and 


3. 

h 

indicates 

a hexadecimal digit lO-Hl 

or -CA-F} 


1.13.T OVFTST - Test for Core Overflow Condition 

At OVFTSTt a check is made for overflow of unprotected core 
•Cif SUta = If no overflow has occurredn a jump is made 

to NXTINP {refer to l.lE.bl to read and process the next 
input block. If overflow has occurredT an error indication 
of is printed using the PRII\JTE subroutine. No more 

relocatable binary input blocks are read as Loading terminates. 
The error exit parameters will be recorded in AINPUT and 
(3INPUT. 

1.13. ID Exit From NAflPRl 

If no core overflow had occurred-i exit from NAMPRl is made 
with the following instruction: 

LABEL OPCODE ADDRESS 


JflP- NXTINP-.I 

EflU NXTINP-CL3> 

1.13.11 Subroutines Used by and External to NAflPRl 


1. 

PRINT3 

is used to 

prinferror indications. 

3. 

PRINTM 

is used to 
tion time 
curren tly 

print the 
re 1 oca ti on 
being read 

pr ogram 
base of 

in . 

name and execu- 
the program 


1.13.13 Subroutines Used by and Internal to NAflPRl* 

1. PRNNAM is used to list name and relocation. 

3. SIGNCK this routine is entered with the upper limit 

to tested in {A> and lower limit in -Cc3>. 


REMARKS 

JUMP TO READ 
NEXT INPUT BLOCK 
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T.m.O RBDBZl 


RBDBZl is the routine which is used to process RBD and BZS 
blocks . 

I.IM.I Constant Table Storage Referenced by RB])BZS 

NAMES USED IN DOCUMENTATION STORAGE POSITION IN CONSTANT 

TABLE 


ASAV 

EH 

BLKCNT 

a? 

BZSSU 

EL 

COMBAS 

1 

COUNTl 

ES 

CSC3LIM 

L 

DATBAS 

E 

DATLIM 

5 

ENDSU 

fl 

INPCTR 

IS 

INPREL 

11 

INPURD 

10 

INPXCO 

57 

PROBAS 

3 

C3SAV 

30 

URDCNT 

EM 

AD JOVF 

SE 

AINPUT 

101 

PRODAT 

lEO 

PROCOM 

lEl 

PARLIM 

13E 

COMLIM 

M 

NXTINP 

03 

PRINT3 

SM 

PROGCT 

IMO 

E3INPUT 

lOE 

SUL 

Efl 

URDCNT 

EM 

PRINTE 

SH 

LNKSTR 

HE 

LNKCTR 

113 

LNKEND 

IIM 


I.IM.E The 

constants are 

used 

1. 

ASAV is 

use 


in 

the 



in the following way: 

d for temporary storage of operands 
A register. 
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a. BLKCNT 

3. BZSSW 

M. COdBAS 
5. COUNTl 

B. CSC3Lin 



7. DATBAS 
a. DATLIfI 

ENDSbJ 


10. INPCTR 

11. INPREL 


la. INPURD 
13. INPXCO 



IM. PROBAS 
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contains the word count for numbor of sequen- 
tial locations to be set to zero in a BZS 
block entry. 

is set to a 0 if an RBD block is to be pro- 
cessed. Alson it is set to a -1 if a BZS 
block is to be processed. 

contains the common storage relocation base. 

is used as a loop counter by the NXTURD sub- 
routine . 

contains the execution time core limit add- 
ress -Cupper limit! for the command sequence 
of the program currently being loaded. -{This 
is equal to 1 -i- address of last word of pro- 
gram- at execution time.! 

contains the relocation base for the Execu- 
tion Time Data Block Reservation. 

contains the upper limit address -Cequal to 
last address + 1! of the Execution Time Data 
Storage Block Reservation. 

is the end of block switch. It is set to a 
1 when the last entry in the input block 
•Ceither RBD or BZS! is being processed. Con- 
tains a zero at all other times. 

contains the execution time address assigned 
to a word from the command sequence input. 

contains in bits 0 and li the information 
which determines which type of address reloca- 
tion is assigned to a command sequence word 
from an input block entry. 

contains a command sequence word from an in- 
put block entry. 

con tains the address constant INPUT where 
INPUT is the 1st location of the area for 
storage of relocatable binary input blocks 
read by the Loader. 

contains the Execution Time Relocation Base 
for the program currently being loaded. 
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IS. 

(3SA V 

is used for temporary storage of operands in. 
the a register. 

lb. 

bJRDCNT 

is used as an address counter to reference 
words in the input block leither RBD or 
BZS> entries. 

17. 

ADJOVF 

address of jump to ADJOVF. 

Ifl. 

AINPUT 

-CAT is stored here upon entry to the loader. 

IG. 

PRODAT 

is non zero if protected data is declared. 

ao. 

PROCOn 

is non zero if protected common is declared. 

ai. 

PARLin 

LOAD+1 of last partition. 

aa. 

conLin 

highest address of common storage+1. 

aa. 

NXTINP 

is address of jump to NXTBLK. 

aM. 

PRINT3 

is used to print error messages. 

as. 

PROCCT 

is the number of words in a program. 

ab. 

(2INPUT 

•CC3> is stored here upon entry to the loader. 

a?. 

SUb 

is used as a switch for relocation type. 

aa. 

URDCNT 

address of character reference counter. 

a^. 

PRINTa 

is used to print error messages. 

30. 

LNKSTR 

is the address of LNKTBL. 

31. 

LNKCTR 

pointer to next available location in LNKTBL- 

3a. 

LNKEND 

last address +1 in LNKTBL. 


l.m.3 Entry to RBDBZl 

Both namosT RBDPRO and BZSPRO are dGclared as entry point 
names in the RBDBZl routine and as externals in the LOADRl 
routine. Entry to either of these routines is as follows: 
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LABEL OPCODE ‘ ADDRESS REMARKS 

jnP RBDPRO 

jnP BZSPRO 

l.m.M RBDPRO 

Command sequence data from an RBD block is placed in core by 
RBDPRO. The first entry in the RBD block contains the start- 
ing address for loading the command sequence data in the block 
together with its address relocation byte. Subsequent entries 
in an RBD block contain the command sequence words to be re- 
corded at consecutive locations beginning with the starting 
address. The address relocation byte in an RBD entry is M 
bits in size. Zero is the leading bit for all but the last 
relocation byte. The leading bit of the relocation byte for 
the last entry in the block is set to a one. 

l.m.S In i tia 1 i za ti on for RBD Block Processing at RBDPRO 

The jump instructions SUE and SUB are two word jump instruc- 
tions using relative addressing. The address in their res- 
pective second words are set during program execution. As 
part of ini tialization for RBDPROt the address of jump in- 
struction SUE is set to SUEA . The address of jump instruc- 
tion SUB will be set to SUBA . Both the loop counter named 
COUNTl and the switch named BZSSU are set to zero. The add- 
ress counter URDCNT is set to the first word address of the 
input buffern ’='INPUT^. Each of these three locations is 
referenced by a closed subroutine called NXTURD . This sub- 
routine is used by both RBDPRO and BZSPRO in order to extract 
all the information pertinent to one entry in the input 
buffer . 

l.m.L Starting Address for Command Sequence Storage 

A return jump is executed to NXTURD to extract the starting 
address for command sequence storage from the input buffer. 
Upon return from NXTURD - 


1. 

INPURD 

contains the 

value for the 

startine address 

E. 

INPREL 

contains a E 

bit relocation 

byte . 

B. 

ENDSU 

is set to zero. 
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ThG starting address may bo either program relocatablen data 
storage relocatable or absolute depending on bits 0 and 1 of 
INPREL: 

1. If -CINPRELI = ODn -CINPWRDI is an absolute value. 

E. If -CINPRELI = 01-. -CINPijJRDl is a value relative to the 

value for the execution time program relocation base 
of -CPROBASI. 

3. If -CINPRELI = lOi IINPURPI is a value relative to the com- 
mon storage relocation base of {C0f1BAS>. 

4. If IINPRELl = 11-1 IINPURDl is a value relative to the 

value for the relocation base of the Execution Time Data 

Storage Block Reservation or -CDATBASl. 

If the starting address is data storage relocatable or common 
storage re 1 oca ta bl e the addresses for the jump instructions 
SUE and SU3 are reset to SUEB and SU3B respectively. To get 
the starting address for relocation-, a return jump is made 
to ADJUST subroutine. 

If the starting address is either data re loca ta ble -i absolute-, 
or common relocatable and if the address of the jump instruc- 
tions stored at SUE and SU3 are to be changed in the manner 
stated above-, then - 

the addresses are changed prior to entering the ADJUST sub- 
routine. Upon return from the ADJUST subroutine-, a jump 
is made to SUE. Branching occurs according to the address 
in the jump instruction at SUE as follows: 

1. Branching to SUEA : The execution time limit address 

for program relocatable input or -CCSi^Lini is placed 
in ASAV. 

E. Branching to SUEB: The execution time limit address 

for data storage = -CDATLini is placed in ASAV. 

3. Branching to SUEC: The limit address communication 

region storage = ^?:E4^ is placed in ASAV. 

1.14.7 RBDPRl - Command Sequence Uords for RBD Blocks 

An entry containing a command sequence word is extracted from 
the input block by a return jump to the NXTURD routine. Upon 
return from NXURD - 

1. INPURD contains a word of the command sequence. 
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2. INPREL contains the 2^ and 2^ bits of the M bit 
relocation byte. 

3. ENDSliJ contains the 2^ bit of the M bit relocation 
byte . 


The location ENDSld will always contain a zero except when the 
last entry in the block is to be processed. It will then 
contain a value of 1. 

1. -CINPRELI = 00 is IINPURDI is an absolute value. 

2. IINPRELI = 01 is IINPURDI is a value relative to 
the execution time program relocation base or 
IPROBASl. 

3. IINPREL3- = 10 if IINPliIRDl is a value relative to 
the common storage relocation base of -CCOnBASl. 

M. IINPRELl = 11 if •CINPURll is a value relative to 
the relocation base for the Execution Time Data 
Storage Block Reservation. 

Adjusting the contents of INPURD for address relocation is 
accomplished in the following way: 


TYPE OF RLCTN 

INPREL 

VALUE ADJUSTED FOR RLCTN 

ABSOLUTE 

00 

■CINPURDl 

POS PROGR. RLCTN 

01 

■CINPURDl+IPROBASl 

POS con STOR RLCTN 

10 

-CINPURDl+CCOMBASl 

POS DAT STOR RLCTN 

11 

•CINPURDl+IDATBAS} 


Negative relocation is not implemented in the PARTI LOADER 
because of lb bit arithmetic. 


The address arithmetic necessary for adjusting a relative 
value for relocation is accomplished by the closed subroutine 
ADJOFl. The closed subroutine is entered by a return jump to 
a location in the constant table. 

Storage occurs if the execution time storage address is less 
than the limit address. The address in INPCTR is increased 
by 1. If -CENDSU> = 0 t a jump is made back to RBDPRl to process 
the next word in the RBD block. If -CENDSliJ a jump is made 
to NXTINP to process the next input block. 
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If TINPCTRI ^ -CASAVIn the input has exceeded the limits of 
the area reserved for it. Branching occurs according to the 
address in the jump instruction as Sw3 as follows: 

1. Branching to SU3A : An error has occurred due to over- 

flowing the amount of space reserved in execution time 
core for program relocatable command sequence currently 
being loaded. An error indication of is printed 

using the PRINT3 subroutine. 

E. Branching to SU3B: An error has occurred due to over- 

flowing the amount of space reserved for the data block. 
An error indication of ^E?^ is printed using the PRINT3 
subroutine . 

3. Branching to SU3C : An error has occurred due to an 

attempt to load information into protected core. An 
error indication of ^EL^ is printed using the PRINT3 
subroutine . 

If one of the above error messages is printedi no more input 
blocks are read and the Loading Operation terminates. 

l.m.a BZSPRO 

Each entry in a BZS block contains the following information: 

1. A starting address which is the first word address 
of a block of core to be cleared to zero by the 
loader. 

E. A relocation byte for the starting address. 

3. An absolute number which is the size of the block 
of core to be cleared to zero by the loader. 

The relocation byte for each entry in a BZS block is 4 bits 

in size. The leading bit of all the relocation bytes except 
for the last entry in the block is set to zero. The leading 

bit of the relocation byte for the last entry in the block 

is set to a one. 

l.m.q In i tia 1 i za t i on for BZS Block Processing 

As part of in i tia 1 i za ti on for BZSPROi the address counter 
URDCNT is set to the 1st word address of the storage area 
for the BZS block-, = ^INPUT^. The switch named BZSSU is set 
to a -1 in order to process a BZS block. 
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I.IH.ID DZS Entries 


The jump instructions S02 and S03 are two word jump instruc- 
tions using relative addressing. The addresses in their 
respective second words are set during program execution. 
Each time a jump is made to the location BZSPREt the address 
in the jump instruction at SUE is set for SbJEAi and the 
address in the jump instruction at S03 is set for S03A. 



The loader executes a return jump to NXTURD to extract an 
entry from the BZS block. Upon return from NXTORD the in- 
formation from the entry is stored in the following way: 

1. INPURD contains the starting address. 

E. INPREL contains the E^ and E^ bits of the H bit 
relocation byte. 

3. ENDSU contains the E^ bit of the M bit relocation 
byte . 

4. BLKCNT contains the size of the block to be cleared 
to zero by the Loader. 

The location ENDSU will always contain a zero except when the 
last entry in the block is to be processed. It will then 
contain a value of 1. The word in INPlilRD is either a 10 bit 
absolute value or a IS bit relative value with either posi- 
tive program or data storage relocation. The location INPREL 
will be set to one of 4 values: 


1. IINPRELT = DO if -tlNPORDl is an absolute value. 


E. -CINPRELT = 01 if -CINPORDT is a value relative to 

the value for the execution time program relocation 
base or -CPR0BAS>. 


3. -CINPRELT = 10 if -CINPORDl is a value relative to 
the common storage relocation base of ICOnBASl. 


4. -CINPRELl = 11 if •CINPORDl is a value relative to 
the value for the relocation base of the Execution 
Time Data Storage Block Reservation. 


1.14.11 





Relocation for Starting Address 

A return jump is executed to the closed subroutine! ADJUSTi 
to obtain the absolute value for a relative address in INPbJRD 
for relocation. Upon return starting from ADJUST - 
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1- INPCTR contains the starting address for command 
sequence storage adjusted for relocation. 

2. If the starting address for the BZS block is rela- 
tive to the execution time data storage relocation 
basGi the address in the jump instruction SUEt 
originally set to SUEA is reset to SIJEB while that 
in SU3 is set to SW3B. 

3. If the starting address for the BZS block is abso- 
luteT the address in jump instruction SUEt origi- 
nally set to SUEA is reset to SUEC while that in 
SU3 is set to Sb)3C . 

l.m.lE Zero Storage in BZS Block 

The Loader proceeds to store zero at all execution time 
locations starting with the address in INPCTR and terminating 
with the address equal to -CINPCTR} + -CBLKCNTI -1. 

A jump is made to SUE where branching occurs according to 
the address in the jump instruction at SUE as follows: 

1. Branching to SUEA : The execution time limit address 

for program relocatable input or -CCS(3Lin> is placed 
in ASAVt and a jump is made to BZSPRE. 

E. Branching to SUEB: The execution time limit address 

for data storage = -C])ATLin> is placed in ASAVn and 
a jump is made to BZSPRE. 

3. Branching to SUEC: The limit address for communi- 
cation region storage = is placed in ASAVn 

and a jump is made to BZSPRE. 

At BZSPRE a test is made to see if the storage address 
in INPCTR is greater than or equal to the storage limit 
address in ASAV. The loop for storing zero in a loca- 
tion is repeated! increasing the contents of INPCTR by 
1 and decreasing the contents of BLKCTR by 1 until - 

a. Either •CBLKCTR}=0 in which the entire block of 
core is cleared to zeron or 

b. -CINPCTR! = -CASAV! in which case the storage limit 
address has been exceeded. 

If b is the case! branching occurs as SUB as follows: 
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1. Branching to- SU3A wi 1 1 occur if the starting address 
in the BZS entry is relative to the execution time 
program relocation base. 

2. Branching to SU3B will occur if the starting address 
is relative to the relocation base for the data 
block . 

3. Branching to SU3C will occur if the starting address 
is absolute. 

If a is the casen the overflow condition has not occurredT 
and a jump is made to BZSPR3. At BZSPR3n a test is made to 
see if the last entry in the BZS block has been processed. 

If lENDSU >=□ n a jump is made to BZSPRl to process the next 
entry in the block. If -CENISU >5^0 t a jump is made to NXTINP 
to read the next input block. 

1.14.13 Exit from RBDBZl 

Exit from either routine is made with the following instruc- 
tion : 

LABEL OPCODE ADDRESS REMARKS 

JMP- NXTINPiI JUMP TO NXTINP 

TO READ 

1.14.14 Subroutines Used by and Internal to RBDPRO and BZSPRO 

There are two subroutines assembled into the same program 
with RBDPRO and BZSPRO. These are NXTURD and ADJUST. 

1.14.15 NXTURD 

This subroutine is used to extract an entry from either 
an RBD block or a BZS block. An RBD block entry consists 
of a command sequence word together with its 4 bit relocation 
byte. A BZS block entry consists of a starting address for 
a BZS block reservation together with its 4 bit relocation 
byte and an absolute number which is the size of the BZS 
block reservation. If entry to NXTURD is from RBDPROi the 
the switch BZSSU has been set to zero. If entry to NXTURD 
is from BZSPROt the switch BZSSU has been made non zero 
and negative. 

If BZSSU is zeron NXTURD will process an entry of the input 
block in the following ways: 
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1. Of a 4 bit rGlocation byte Tbits 0~3> right to leftn 

a. bits □ and 1 are placed in INPRELn 

b. bit 3 is placed in ENDSU. 

E. The command sequence word is placed in INPMRD. 

If BZSSM is non zeron NXTURD will process an entry of the 
input block in the following way: 

1. Of a 4 bit relocation byte Tbits 0-3 right to left}: 

a. bits □ and 1 are placed in INPRELn 

b. bit 3 is placed in ENDSU. 

E. The size of the BZS block reservation is placed in 

BLKCNT. 

If INPREL is zero it means that absolute relocation is used. 
If absolute relocation is not used a check is made for ^7FFD 
or $7FFE. The FORTRAN COMPILER generates these numbers for 
backwards IS bit relocation in FLOT CALLS. Bit IS of these 
two values must be set to cause lb bit address arithmetic to 
generate an end around carry. 

BACKUARDS RELOCATION - BCRLSU is set to zero if backwards 

relocation occurs otherwise it is non- 
zero. For backwards relocation lb 
bit address arithmetic must generate 
an end around carry to simulate IS 
bit wrap-around. 


l.m.lb ADJUST 

The ADJUST subroutine is used by BZSPRO and RBDPRO to 

1. Determine the relocation base for the starting 

address of the BZS reservation in each entry of the 
command sequence! and 

E. If the address is not absolute! to increase the 

relative value by the appropriate relocation base. 

Upon entry to ADJUSTt the address of concern is in INPURD. 
All lb bit address arithmetic is carried out in the ADJOFl 
subroutine. Prior to entering ADJOFIt the A register con- 
tains the relative address contained in INPURD. The reloca- 
tion base is in the Q register. Upon return from ADJOFIt 
the result is placed in INPCTR . 
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Address relocation is handled in one of three ways: 

1. Absolute Addresses' = No Relocation 

No address relocation is necessary for absolute 
address. The contents of INPURD is placed in INPCTR: 

-CINPURDT ^ INPCTR 

If the ADJUST routine determines that the value 
for the absolute starting address is either less 
than or greater than a jump is made to 

SU3 to print the appropriate error indication and 
then to proceed to the error exit* If ADJUST 
determines that the absolute starting address was 
within the bounds of $CS-$E3 .t the addresses for 
the jump instructions at SUE and SU3 are reset as 
follows: 

a. If entry to ADJUST was from RBDPRO or BZSPROn 

SUEC > SUE-, and 

SU3C ^ SU3. 

Following this a jump is made from ADJUST. 

E. Program Relocatable Addresses 

Following a return transfer to ADJ0VF-, the relative 
address is increased by the command sequence relo- 
cation basen and the result is placed in INPCTR: 

•CINPURDI + -fPROBASI > INPCTR 

A jump is made to exit from ADJUST. 

3. Data Storage Relocatable Addresses. 

Following a return transfer to ADJOVFi the relative 
address is increased by the data storage relocation 
base-, and the result is placed in INPCTR: 

•CINPURDI + -CDATBASI > INPCTR 

a. If entry to ADJUST was made from RBDPRO or 
BZSPR0-, 

SUEB ^ SUE-, and SU3B > SU3- 
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STRLNK 

This routine check: 


to 


see if a command sequence word is pro- 
gram relocatable and a check is made to see if the LINK TABLE 
is full. If the link table is full and EIS error is printed 
and the load operation terminates. If the command sequence 
word contains ^7FFF its address is put in the link table. 


l-m.lfl LINK TABLE 


The link table contains the addresses of any program reloca- 
tion value that has been absolutized to $7FFF. The LINKll 
routine uses the link table to determine if a ^7FFF is a true 
end of string when patching. Both the assembler and compiler 
use $7FFF to indicate the end of string of an external to 
a program . 

EXAMPLE: 


EXT 

DOG 

LD A + 

DOG 

STA + 

DOG 

0 

C400 

1 

7FFFX 

B 

moD 

3 

Doaxx 


cation 


The execution time or partition base is ^7FFE. The command 
sequence is absolutized to look like this: 


EXECUTION TIME 


ADDRESS 


CODE 


$7FFE C^QU 

^7FFF 7FFFX 

^fiDQO 6400 

$flODl 7FFFX This location points back 

to location 7FFF. 

The entry for DOG in the external table looks like this: 


D 

□ 

G 

A 

A 

A 

flUOl 


Po in ts 
stri ng 


to first location of 
in program. 


link 


The LINK table contains an $ 
stored in the location with 
^flOOl is an address pointing 
$7FFF. 


flODl indicating that the $7FFF 
the execution time address of 
to the absolute location of 
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l.m.n Subroutines Used by and External to RBDPRO and BZSPRO 
1. PRINT3 is used for printing error indications. 

E. ADJOVF is used by ADJUST for address arithmetic. 
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I.IS.Q XFRPRl 

XFRPRl is the routine which processes an XFR block. 
I.IS.I Constant Table Storage Referenced by XFRPRl 


NAI1E USED IN DOCUHENTATION STORAGE POSITION IN CONSTANT 



TABLE 

AINPUT 

101 

BLANKS 

Ifl 

CSt3Lin 

U 

ENDINP 

17 

INPUT 

147 

PROBAS 

3 

XFRNAfl 

3E 

NXTINP 

U3 


I.IS.S The constants are used as follows; 



1. 

AINPUT 

contains one of the entrance parameters for 
the Loader Operation. 

'O 

a. 

BLANKS 

a constant = ASCII code for B spaces. -CBLANKSl 
= $EDao. 


3. 

NXTINP 

contains address of NXTBLK. 


4 . 

csc3Lin 

contains one plus the highest execution time 
address occupied by the command sequence 
storage of the program whose XFR block is 
currently being processed. 


s. 

ENDINP 

contains the highest load time address for 
command sequence storage. 


L. 

INPUT 

is the 1st location of a LD word area reserved 
for storage of relocatable binary input. 


7. 

PROBAS 

is set to the execution time relocation base 
for the next, relocatable binary program to be 
1 oaded . 


fi. 

XFRNAM 

contains the L character transfer name from 
the last XFR bl ock. processed which had a name. 


1.1S.3 Entry to XFRPRl 

The name XFRPRl is declared as an entry point name in the 
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XFRPRl routine and as -an external in the LOADRl routine. 

Entry to XFRPRl is made with the following instruction: 

LABEL OPCODE ADDRESS REMARKS 

JMP XFRPRO 

I.IS.*! Recording Transfer Name 

When the Loader is brought into coren the locations XFRNAMt 
XFRNAM+ l a XFRNAH+E are set to zero. If the XFR block con- 
tains a transfer namen it is recorded in the locations 
INPUT+1-. INPUT + E and INPUT + 3. If the XFR block does not 
contain a transfer namen each of these 3 locations contains 
the ASCII code for E spaces. 

If the XFR block contains a namei XFRPRl replaces the current 
contents of XFRNAHn XFRNAM+1 and XFRNAH+E with the ASCII 
code for this L character name. 



I.IS.S Recording Relocation Base for Next Program 
Prior to the exit from XFRPRl: 


1. -{CS£2Lin> — > PROBAS where -tPROBASl = execution 

time relocation base of next 
program to be read in. 


I.IS.L Exit from XFRPRl 



A test is made to determine the type of Loader Operation is 
in progress. If bits □ and 1 of AINPUT are set to Ot the 
Loader Operation is Relocatable Binary Load. Exit from 
XFRPRl is then made with the following instruction: 


LABEL 

OPCODE 

ADDRESS 

REMARKS 


JHP- 

NXTINPnl 

GO TO NXTINP 
TO BEGIN 

Upon execution 
the next input 

of this instruction the 
block which must be one 

Loader will look for 
of the f ol lowing : 


1. The NAH block of the next programi 
E. an EOL block 

3. if no data is read by the Loaderi it is the same as 
if an EOL block had been received. 
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If the LoadGP Operation is either a Subroutine Load or a 
Program Loadi exit from XFRPRl is made with the following 
instruction : 

LABEL OPCODE ADDRESS REMARKS 

JMP ALRMOK 

where the name ALRMOK is referenced as an external in XFRPRl 
and as an entry point in the LOADRl routine. 
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I.IL.D ENTEXl 


The ENTEXl subprogram of the Loader is used to process EXT 
and ENT blocks. 

I.IL.I Constant Table Storage Referenced by ENTEXl 

NAME USED IN DOCUflENTATION STORAGE POSITION IN CONSTANT 

TABLE 



ENTPNT 

13 


INPCTR 

IS 


INPURD 

10 


INPXCC 

LE 


PROBAS 

3 


SUL 

Efl 


EXTSUT 

im 


IGNORE 

111 


NXTINP 

L3 


PRINT3 

SM 


PRINTS 

Tfl 


TABSCH 

MO 


constants are used in 

the following way: 


ENTPNT contains 

the address which is 

to be inserted 

into the 

Mth word of a Loader 

Table entry. 



E. 

INPCTR 

is used as an address counter to reference 
entries in the input block -[either ENT or EXT> 

3. 

INPURD 

is used as a temporary storage location. 

M. 

INPXCC 

contains the address constant = ^INPUT-»-3^. 

s. 

PROBAS 

contains the execution time relocation base 
for the program currently being loaded. 

L. 

SUL 

if positive it indicates a match was found 
in TABSCH. 

7. 

EXTSUT 

non-zero if processing EXT block. 

fl. 

IGNORE 

flag to ignore duplicate entry points during 
crep table load. 


NXTINP 

contains jump to NXTBLK routine in loader. 
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10. 

PRINT3 

used 

to print 

error messages. 

11. 

PRINTS 

used 

to print 

b character name. 

IE. 

TABSCH 

contains jump 

to TABSCH. 


1.1L.3 Entry to ENTEXl 

The names ENTPRO and EXTPRO are declared as entry point 
names in the ENTEXl routine and as external names in the 
LOADRl Routine. Entry to either of these routines is as 
foil ows : 

LABEL OPCODE ADDRESS REMARKS 

JMP ENTPRO 

JMP EXTPRO 

1.1L.4 ENTPRO 

An entry in an ENT block contains a L character entry point 
name and a IS or IL bit entry point address. ENTPRO will 
perform one of three functions based on the following 
conditions : 

CONDITION 1: is that there exists no entry in the Loader 

Table which contains a (□ character name to 
match the entry point name from the input block. 
ENTPRO will enter the entry point name and 
address into the loader entry point table. 

CONDITION B: is that there exists an entry in the Loader 

entry point table which contains a L character 
entry point name which matches the L character 
entry point name in the input block. The 
loader outputs a message and ignores the dupli- 
cate entry point. 

1.1L.5 ENTPRl - ENT Block Entries 

ENT block entries are four words each. The first three words 
contain a b character entry point name. {Fewer than b charac- 
ters in a name means that the ASCII code for spaces will be 
used as fill at the right end of the name-I If the entry 
point address is program relocatable! the fourth word of the 
entry will contain a positive number which is the relative 
IS bit entry point address. If the entry point address is 
absolute! the fourth word of the entry will contain a nega- 
tive number which is the one^s complement of the IS bit entry 
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point address. The end of the input block is marked by an 
entry point name equal to zero. 

INPCTR is used by the closed subroutine NXTNAfl to extract 
entries from the ENT block. Initially INPCTR is increased 
by M upon each entry to NXTNAfl from ENTPRO. This will set 
INPCTR to the first word address of the next entry in the 
ENT block. 

There will be no return from NXTNAfl if -CIINPCTRI} = □. In- 
stead! there will be a jump from the NXTNAfl subroutine to 
NXTINP to process the next input block. NXTINP branches to 
NXTBLK in the LOADRl module. 

I.IL.L Searching the Loader Table for Hatching Name 

There is a return jump to the closed subroutine TABSCH to 
find an entry in the Loader Table containing a b character 
name to match the entry point name from the input block. 
Upon return from TABSCH only one of the following occurs: 

1. SUb=G is a match has been found. 

E. If a matching name had not been foundn -CSULI is 
negative. HSHADR points to address where entry 
point name will be stored. 

1.1b. 7 Matching Name is Entry Point 

It is an error condition of an entry point name in the ENT 
block matches an entry point name in the Loader Table. A 
return jump is made to PRINT3 to print the error message 
^Efl^. A return jump is also made to PRINTS to list the 
entry point name. 

1.1b. a EXTPRO 

An entry in an EXT block contains a b character external 
name and a IS or lb bit link address. 

l.lb.H EXTPRl - EXT Block Entries 

EXT block entries are four words each. The first three 
words contain a b character external name. -[Fewer than b 
characters in a name means that the ASCII code for spaces 
will be used as fill at the right end of the name}. If 
the link address is program relocatable! the fourth word 
of the entry will contain a positive number which is the 
relative lb bit link address. If the link address is 
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absolutGT the fourth word of tho entry will contain a 
negative number which is the one^s complement of the IS bit ’ 
entry point addressi the end of the input block is marked 
by a word of zeros. 

INPCTR is used by the closed subroutine NXTNAH to extract 
entries from the EXT block. Initially INPCTR is set to the- 
address '^INPUT-3^ by EXTPRl. The contents of INPCTR is 
increased by M upon each entry to NXTNAH from EXTPRl. This 
will set INPCTR to the first word address of the next entry 
in the EXT block. The routine NXTNAH is used to extract 
entries from the EXT block. There will be no return from 
NXTNAN if I-CINPCTR >> = □ . Instead there will be a jump from 
NXTNAfI to NXTBLK to process the next input block. 

I.IL.ID Exit from ENTEXT 

The exit from either of these routines is with the following 
instruction : 


LABEL 

OPCODE 

ADDRESS 

REMARKS 


jnp- 

NXTINP-.I 

JUMP TO NXTINP 



l.lL.ll Subroutines Used by and Internal to ENTPRO and EXTPRO 

The NXTNAfI routine is used by both ENTPRO and EXTPRO to 
extract the next entry to be processed from the input block. 

l.lL.ia 'NXTNAfI 

This subroutine is used to extract an entry from either an 
EXT block or an ENT block. A single word entry in either 
type of block consists of a L character name and a IS bit 
address as follows: 


WORD 1 


UORB E 


WORD 3 


LJORD M 



Char 1 

Char 

E 

Char 3 

Char 


Char S 

Char 

L 

Address 
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Address is tho on try point address when processing 

entry point names if an externa, block is being processedn 
address is the link address of the name. 

Upon entry to NXTNAfln the contents of INPCTR is increased 
by M to set it to the first word address of the next entry 
to be processed. If -C-CINPCTRIT is either a +0 or a -Qt the 
last entry of the input block had been processed. 

NXTNAfl will jump to NXTINP to process the next input block. 
If -C-CINPCTR>> is not zeron NXTNAd will look at the IS bit 
address in the last word of the entry. If -C-CINPCTR >+3> is 
negativei it is the one^s complement of a IS bit address 
which is absolute. NXTNAfl will place the one^s complement 
of the contents of the Mth word of the entry in ENTPNT: 

-C-aNPCTR>+3> ENTPNT 

If this address is positive! it is a program relocatable 
address. NXTNAfl will add the relative value in word M of 
the entry to the program relocation base and place the re- 
sult in ENTPNT: 


•CINPCTRI+M INPCTR 

A jump is made to the exit from NXTNAfl. 

1.1b. 13 Subroutines Used by and External to ENTPRO and EXTPRO 


•1. TABSCH 

E. ENTSTR 
3. EXSTOR 
M. PRINT3 

S. PRINTS 


is used to search the Loader Table for a name 
to match the name in the input block entry 
being processed. 

is used to enter a name from the input block 
entry being processed into the Loader Table. 

is used to get address of next available 
slot in External Table. 

is used by ENTPRO to print an error indica- 
tion when it encounters an entry point name 
in the input block which matches an entry 
point name in the Loader Table. 

is used by ENTPRO to print the entry point 
name causing the error described in M. 
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1.17.Q STBASE is used to initialize most of the constants 

in the constant table. The routine that 
references STBASE is BRNCHl. STBASE is 
entered by the following instruction-* 

LABEL OPCODE ADDRESS REMARKS 


1.17.1 


JMP STBASE 

STBASE is declared as an external in the 3RNCH1 

NAMES USED IN DOCUMENTATION STORAGE POSITION 

TABLE 


module . 

IN CONSTANT 



CSd3NUM 

IE 

COUNTl 

ES 

PGELGN 

1D3 

BASE 

E3 

NOPAGE 

130 

CMNXIT 

133 

TEMP 

li|3 

ADDR 

117 

ENTSEC 

1E7 

OVSTR 

1E^ 

OVCTR 

lES 

EXTSTR 

iia 

EXTCTR 

7 

CSC3SEC 

lEfl 

MAXPGE 

1E3 

PRINTE 

53 

CS(3LIM 

L 

LNKSTR 

HE 

LNKCTR 

113 

LNKEND 

im 

(3INPUT 

lOE 

PARBAS 

131 

PROBAS 

3 

PARLIM 

13E 

DATBAS 

E 

PRODAT 

lEO 

DATLIM 

5 

PROCOM 

lEl 

COMLIM 

M 

COMBAS 

1 

CORADR 

113 


CD 
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1.17.E 


AA 3777 


The 

constants 

are used as follows: 

1. 

CS(3NUn 

is the number of sectors reserved for entry 
external tables before command sequence start. 

E. 

COUNTl 

is used to store the complement of the number 
of pages. 

3. 

PGELGN 

is the length of page with core flags. 

M. 

BASE 

is the base address of the loader. 

s. 

NOPAGE 

is the number of pages in unprotected core. 

b • 

CflNXIT 

is used to set up exit parameters and to exit 
program . 

7. 

TEMP 

is used as a temporary storage location. 

fi. 

AODR 

is used for the address of command sequence 
page . 

T. 

ENTSEC 

is the starting sector of ENT/EXT tables- 

ID. 

OVSTR 

word address of overflow table start. 

11. 

OVCTR 

point to next available location in overflow 
table . 

IE. 

EXTSTR 

word address of start of EXT table. 

13. 

EXTCTR 

points to next available location in EXT 
table . 

m. 

CS(3SEC 

starting sector of command sequence image. 

IS. 

NAXPGE 

maximum page number that can be used on mass 
memory. 

lb. 

PRINTE 

is used to print error messages and terminate 
load. 

17. 

CS(3Lin 

highest address of command sequence storage 
+1 . 

la . 

LNKSTR 

is the address of the link table- 

IH. 

LNKCTR 

is the next available location in the LINK 
TABLE. 


• 
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ED. 

LNKEND 

is the last address +1 in the LINK TABLE. 

El. 

(3INPUT 

(3 is stored here upon entering the loader. 
(3 input contains the core address of the 
program bases. 

EE. 

PARBAS 

is address of the start partition to be 
loaded. 

• 

m 

ru 

PARLin 

LUAD+1 of last partition to be loaded. 

EM. 

DATBAS 

is the relocation base for data storage. 

ES. 

PROBAS 

is the relocation base for the program cur- 
rently being loaded. 

ru 

PRODAT 

is non zero if protected data is declared. 

E7. 

DATLin 

is the highest address of data storage+1. 

Efl. 

PROCOn 

is non zero if protected common is declared. 

ET. 

conLin 

is the highest address of common storage+1. 

30. 

COHBAS 

is the relocation base for common storage. 

31 . 

CORADR 

contains -C$F7>+1. 

1.17.3 Entry 

to STBASE 



Prior to entry to STBASEt C3INPUT is set to the core address 
of the first four sequential locations containing the base 
address used by the loader to set limits. 

1*17. M Constants set by STBASE are set in the following manner: 

Contents of the address in (3INPUT =^PARBAS. 

PARBAS + B =^PR0BAS 

PROBAS =^CS(3LIf1 

Last address +1 of end of partition =^PARLIf1. 

DATA BASE =$> DATBAS if not zero. If data base is zero it 
is assigned within the partition. 
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LVLSTR is the start of allocatable core for level 0 

LVLSTR ==>PR0DAT 
PRODAT ==>DATLin 

LVLSTR can be found in the core allocator table in SYSBUF. 

If common is system common 

connoN BASE PROcon 
PROCOn COHBAS 
TOP of part 0 ==>C0nLin 
If no system common is declared. 

PARLin CONLIfl 

LOlilEST unprotected location -1 =^C0RADR 

CORADR =^AIPAGE 

IBASE OF LOADER - START OF UNPROTECTED! -fr lOE — > NOPAGE. 

NOPAGE =^C0UNT1 

If no pages are available a jump to PRINTS is executed to 
print an Ell and terminate the load. 

□ =$>ADDR laddress of command sequence page} 

-COUNTl =# COUNTl 

Ini tialization of core flags is done in the following way: 

ADDR NUMBER 

0 REFER 

REFER =^nODIFY 

This is done in a program loop to initialize the core flags 
of all the pages in core Irefer to 1.ES.3}. 
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BASE OF ENT/EXT TABLES ENTSEC 
CS(3NUI1 + ENTSEC =# CSc3SEC 

A check is made on mass memory to see if there is room for the 
command sequence pages. 

1.17.S To exit from STBASE the following instruction is executed: 
LABEL OPCODE ADDRESS REMARKS 

JflP- CMNXITiI EXIT 
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l.lfi.O LNKENT 

LNKENT uses a return jump, to patch program externals and 

a return jump to TABSCH to search the loader table for a mat- 
ching transfer name. On return from TBSCHt SUL is positive if 
a match is found in the loader table. If SUL is negative on 
return from TABSCH an E13 is printed and the load terminates. 
LNKENT stores the transfer address in the second word of com- 
mand sequence. 

l.lfl.l NAMES USED IN DOCUMENTATION STORAGE POSITION IN CONSTANT 

TABLE 


XFRNAM 

3E 

XFRADR 

135 

PARBAS 

131 

SUL 

Ea 

TABSCH 

MB 

INPCTR 

IS 

ENTPNT 

13 

PRINTE 

SH 


l.lfi.E The constants are used in the following way: 

1. XFRNAM is used for storage of a six character 

transfer name. 


E. XFRADR is the transfer address of the name from the 

last transfer block encountered. 


3. PROBAS is the address of the start partition of the 

load . 


M. SUL 

S. TABSCH 
L. INPCTR 

7. ENTPNT 

a. PRINTE 


is used as a switch indicator upon return 
from TABSCH. SUL is positive if a match is 
found. 

address of TABSCH in LOAD. 

is used to address location of command se- 
quence storage. 

contains address associated with name in ENT 
or EXT table. 

is used to print error messages and terminate 
loading. 
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External Subprograms Used by LNKENT 


PATCH 

is used 

to 

pa tc 

h 

all progra 

m e 

X tern 

a Is . 


TABSCH 

is used 

to 

sear 

ch 

table for 

a 

ma tch 

ing 

trans 


fer nam 

e . 

If n 

0 

entry is f 

oun 

d an 

E13 

is 


printed 

and 

the 

1 

oad termin 

a te 

s . 



DISKUR 

is used 

to 

s tor 

e 

transfer a 

ddr 

ess i 

n the 


second 

word 

of 

th 

e command 

sequence 

• 



1 . 1&.3 Exit From LNKENT 

The following instruction is used to exit LNKENT: 
LABEL OPCODE ADDRESS REMARKS 


JflP 


EXIT 



Uhere EXIT is declared external- EXIT is in the LNKCRl 
module. 


CO 
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l.n.Q LNKCRl 

LNKCRl is usGd to link the CREPl table to program externals. 
The CREPl table is a table of core resident entry points in 
PART 1. The first location of the entry point table contains 
the number of sectors the table uses. The end of the table 
and the end of the sector will be indicated by minus zero. 

LNKCRl uses TABSCH to search the entry point table for a 
match with the CREPl entry points. On return from TABSCHi 
SUL is checked to see if a duplicate entry point was found. 

If a duplicate entry point is found in the Loader entry point 
table while loading the CREPl tablei the CREPl entry point is 
ignored and no diagnostic is issued. 

I.IR.I NAflES USED IN DOCUMENTATION STORAGE POSITION IN CONSTANT 

TABLE 


CMNXIT 13“=] 
SAVEA ma 
MASINP 107 
INPUT 1M7 
INPXCO 57 
INPCTR IS 
TEMP3 IMR 
ENTPNT 13 
TABSCH MO 
SUL afi 
NOTLNK IL 


i.iH.a 

The 

constants 

are used in the following way: 


1. 

CMNXIT 

is used to exit from this program and to 
store exit parameters. 


a. 

SAVEA 

is used as a temporary storage location for 
sector of CREPl table. 


3. 

MASINP 

contains logical unit for MDRIV. LNKCRl sets 
MASINP to $aca. 


M . 

INPUT 

is used as an input buffer. 


5. 

INPXCO 

contains the address of the input buffer. 


L. 

INPCTR 

is used to address locations of command se- 
quence storage. 
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7. 

TEMP3 

is used as a temporary storage location for 
the number of sectors in the CREPl table. 

fl. 

ENTPNT 

contains address associated with name in 
ENT or EXT tables. 


TABSCH 

address of a jump to TABSCH. 

ID. 

SUb 

is used to indicate if a match is found on 
return from TABSCH. 

11. 

NOTLNK 

is a one if unpatched externals are found. 


l.n.3 External Subprograms Used by LNKCRl- 


l.n.3-1 TABSCH is used to search entry point table for a 

match. Prior to the return jump to TABSCH 
the {A> register is set to the entry point 
value to be searched for- 


a 


1.1H.3.E 

ENTSTR 

is 

used 

to 

store an entry in 

the HASH TABLE 



or 

OVERFLObJ 

TABLE. 


I.IH.3.3 

PATCH 

is 

used 

to 

patch CREPl table 

with externals. 

1.1H.3.^ 

URTOUT 

is 

used 

to 

write out pages to mass memory 



if 

there 

are no unpatched externals. 

1.1H.3.S . 

MDRIV 

i s 

used 

to 

read in a sector 

of CREPl table 


from mass storage. HDRIV is referenced in 
the subroutine READIN. 


l.n.1 Internal Subroutines Used by LNKCRl 

l.n.M.l READIN is used to read a sector of the CREPl table 

into the input buffer. The last location +1 
of the input buffer is set to a minus zero to 
indicate the end of the sector. 


l.l'l.S Exit from LNKCRl 

To exit from LNKCRl the following instruction is executed: 


LABEL OPCODE 


ADDRESS REMARKS 



JMP- CnNXIT-iI 
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1.20-D BLDCRl 

This routine picks up the PART □ external references to core 
resident PART 1 programs and puts them in the external table. 
A return jump is made to patch externals and squeezes entry 
points together in the Entry table. 

The CREPl table is stored behind the command sequence on 
the disk. LIBEDT will move the table to an appropriate place 
on the disk and update the sector availability table. 

l.BD.l NAMES USED IN DOCUMENTATION STORAGE LOCATION IN CONSTANT 



TABLE 

CSC3SEC 

lafi 

SECTOR 

13fl 

PARBAS 

131 

INPURD 

ID 

SECTEM 

m3 

INPCTR 

IS 

TEMP3 

IMM 

SUb 

aa 

ENTPNT 

13 

TEMPI 

Mb 

HSHADR 

M3 

OVSTR 

laM 

OVCTR 

las 

LGEPGE 

110 

MSDUCT 

13M 

STRSEC 

133 

HSHTBL 

iDa 


l.EO.a 



Constant stora 
1. CSC3CTR 

a. SECTOR 
3. PARBAS 
M. INPURD 
S. SECTEM 

b. INPCTR 


ge is used as follows: 

last address of program command sequence 
storage +1. 

number of words in SECTOR. 

address of start of partition. 

contains end of command sequence storage. 

sector number of CREPl table storage on mass 
memory. 

used to address location of command sequence 
storage. 
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7. 

TEMP3 

temporary storage. 

a. 

SUU 

is used as a counter. 

T. 

ENTPNT 

contains address associated with name in ENT 
or EXT table. 

10. 

TEMPI 

used as temporary storage. 

11. 

HSHADR 

relative address of ENT or EXT on mass memory. 

la. 

OVSTR 

word address of overflow table start. 

13. 

OVCTR 

points to next available location in the over- 
flow table. 

m. 

LGEPGE 

largest command sequence page that has been 
stored into. 

IS. 

MSDUCT 

number of words stored on mass memory. 

lb. 

STRSEC 

starting sector of image on mass memory. 

17. 

HSHTBL 

number of hash codes in hash table. 

Entry 

to BLDCRl 



BLDCRl is declared external to load and is entered by a S 
.word jump instruction. 

LABEL OPCODE ADDRESS REMARKS 

JMP BLDCRl 

l.EO.M External Subprograms Used by BLDCRl 

l.EQ.M.l EXSTOR is used to store address of next available 

slot in the external table into HSHADR. The 
counter for the External table is incremented 
to the next position. EXSTOR is declared ex- 
ternal in BIDCRl and is entered by a return 
jump. Upon entry to EXSTOR the A register 
contains the address associated with the name 
in the external table. 
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l.EP.M.2 PATCH is used to patch PART □ GxtGrnals. PATCH is 

declarod as an GxtGrnal in BLDCRl and is 
GntGTGd by a return jump. Prior to entry to 
PATCH all of the PART □ external references 
to core resident PART 1 programs are put in 
the External table. 


1.EQ.M.3 URTOUT is used to write out ENTRY-EXTERNAL pages on 

mass memory. A page must be modified before 
it can be written on mass memory. 

l.EP.M.M DISKNR is used to write into crep table block. 

l.EO.S Subroutines Used Internal to BLDCRl 


1.30.5.1 S^UEEZ is used to squeeze entry points in the hash 

table together. Entry points in the overflow 
table are consecutive and do not need to be 
squeezed. SC3ZBIT is called by S(3UEEZ to 
squeeze the bits in the bit table together. 
SC3UEEZ and S(3ZBIT are entered by return jumps. 
$FFFF is written at the end of the entry table 
to indicate the end of the table. SC3UEEZ 
determines which page to write the CREPl table 
into. The first word of the CREPl table con- 
tains the number of sectors of the crep table 
block. 

l.EO.S.E MOVTBL is used to read a word by calling DISKRD and 

write a word by calling DISKUR. The entry 
points are stored consecutively from the hash 
table . 

l.EP.L Exit Procedure: 


$EE is stored in second word of a two word jump at BLDXIT 
and a return jump is made through $EE. $EE is a location in 
the communications region used for return to the job pro- 
cessor by the loader. 
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l.El.Q PATCH 

PATCH is usGd to patch externals referenced in programs being 
loaded. Bit IS of word zero indicates a relative or absolute 
external. Bit IS of word one is used to determine if the 
external is patched. 

EXAMPLE EXT ABCDEF 

IS 7 


one indicates relative — 0 


one indicates patched 1 


B 


LINK is the link address 3 
of the external name. 


1 

A 

B 

1 

C 

D 

E 

F 

LINK 



l.Bl.l NAMES USED IN DOCUMENTATION STORAGE POSITION IN CONSTANT 



TABLE 

EXTCTR 

7 

EXTSTR 

llfl 

SECTOR 

13fl 

TEMP3 

IMM 

EXTADR 

1M3 

INPXCO 

S7 

INPCTR 

IS 

ABRLSU 


TABSCH 

MD 

SUL 

Efl 

NOTLNK 

IL 

LINK 

m 

ENTPNT 

13 

LINKl 

IBM 
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l.El.B Communications Region Used 

ZERO -£$52} = D 
nASKS = ^fiDDQ 





1.E1.3 Usage of Constant Table is as Follows: 


1. 

EXTCTR 

points to the next location in external table 

2. 

EXTSTR 

word address of start of external table. 

3. 

SECTOR 

number of words in a sector. 


TEf1P3 

temporary location used as a counter- 

5. 

EXTAOR 

sector number of CREPl table storage on mass 
memory. 

tj • 

INPXCO 

address of input buffer. 

7. 

INPCTR. 

used to address location of command sequence 
storage . 

a. 

ABRLSU 

is used as an absolute or relative External 
svgitch. 


TABSCH 

address of TABSCH routine. 

CD 

r-a 

SUB 

indicates external is patched- 

11. 

NOTLNK 

will be a one if unpatched externals are 
found. 

IS. 

LINK 

contains address associated with name in 
loader table- 

13. 

ENTPNT 

contains address associated with name in ENT 
or EXT table. 

m. 

LINKl 

address of LINKl routine. 

1.21.M Subprograms 

used by PATCH are: 

1.21.M.1 

DISKRO 

used to get a word from mass memory. 

l.^l.^ .2 

DISKUR 

used to write a PATCH word on mass memory. 

1.21.M.3 

TABSCH 

used to search entry points for' a match- 
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LINKl If a match is found in TABSCH an RTJ- LINKl 

is made to patch externals. Upon return 
from LINKl the ^PATCHED'^ flag in word E of 
the external table entry is sot and the 
patched word is written out by DISKliJR. If 
no match is found NOTLNK is set to a one • 

l.El.S PATCH is entered by a 

RTJ PATCH 
to exit from PATCH 

JHP« -CPATCHl 

If there are no externals in the External table upon entry to 
PATCH a return is made to the calling program. 



Q> 
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1.22.D TBSCHl 

The TBSCHl subroutine is used to search the Loader Table for 
an entry containing a name to match a name supplied by the 
calling program. The entry point name for TBSCHl is TABSCH. 

l.EE.l Constant Table Storage Referenced by TBSCHl 

NAMES USED IN DOCUMENTATION STORAGE POSITION IN CONSTANT 



TABLE 

SUb 

Efl 

AHOLD 

13b 

INPCTR 

IS 

SCHXIT 

3T 

HSHADR 

M3 

TEMP 

MS 

ENTPNT 

13 


l.EE.E Constant Storage is used as follows:- 


1. AHOLD 
E. INPCTR 

3- SUL 

M. SCHXIT 
5. TEMP 
U. ENTPNT 

7. HSHADR 


is used as temporary storage for the A regis- 
ter during execution of the TABSCH subroutine. 

contains the first address of storage of 
the name being searched for in the Loader 
Table . 

is used as a counter for program execution 
within a loop an'd also is set to indicate 
if a match is found while searching the 
loader table. 

is used to exit from program, 
is a temporary location. 

contains address associated with name in 
entry or external table. 

is the relative address of a hash table entry. 


1.EE.3 Communication Region Constants Used by TBSCHl 
CONSTANT LOCATION 

$00DU ^E = LPMSK 
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l.EE.M Entry to TBSCHl 

Prior to entering TBSCHln the location INPCTR is set to the 
1st word address of the sequential locations containing the 
name being searched for in the Loader Table. Entry is made 
to TBSCHl with the following instruction: 

LABEL OPCODE ADDRESS REMARKS 

RTJ- TABSCHnI 

l-EE.S Searching Operation 

Upon entry to the TBSCHl subroutine - 

1. The location INPCTR contains the first word address 
of some entry in the input block. 

1. EE. 5.1 tBSCHl does a return jump to HASH to hash the entry point 

name. The result of HASH gives the appropiate address of an 
entry point name. On return from HASH a return jump is made 
to BITCHK. BITCHK checks the bit table to see if an entry 
has been made in that hash table position. 

If the name from the input block entry does not match any 
name in the loader tablen the location SUL is set to -On 
and a transfer is made to the exit from TBSCHl. 

The location HAHADR contains the base address of the loader 
■ table and SUL is used as an index counter in searching the 
loader table. Initially! upon entry to TBSCHli the location 
SUL is cleared to zero. TBSCHl will compare bits D-m of 
the first 3 words of each entry of the LOADER TABLE with 
bits 0-m of the first 3 words of the entry from the INPUT 
BLOCK las the result of indexing through the table! as 
follows : 

I-aNPCTRl! is compared with IIHSHADR 1+SUL >} 

IIINPCTRl+l! is compared with I-CHSHADR > + ISUL> + l> 

I-CINPCTRl+E! is compared with -C-CHSHADR>+-CSUL> + E> 

If a comparison is made between the name in a LOADER Table 
entry and the given namei a jump is made to the exit from 
TBSCHl. Upon exit from TBSCHl the address obtained by the 
addi ti on 


•CHSHADRl+CSUL! 
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is the 1st core location of tho LOADER Tablo entry with 
the matching name. 

Each time a comparison test with a LOADER Table entry failsi 
the value in SUL is increased in order to access the next 
Loader Table entry: 

l.EE.L Exit from TBSCHl 

Exit from the TBSCHl subroutine is made with the following 
instruction : 

LABEL OPCODE ADDRESS REHARKS 

jnP- SCHXIT-.I 


1.EE.7 Subprograms external to TABSCH: 


1. BE. 7.1 

HASH 

used to 

hash entry or external name. 

1.EE.7.E 

BITCHK 

used to 
an entry 

check bit table to 
for that position 

see if there is 
in the Hash Table. 

l.EE.7.3 

DISKRD 

is used 

to get a word from 

mass memory. 


These subprograms are entered by executing the following 
instruction : 


RTJ NAME 

To exit from these routines the following instruction is 
executed: 


jnP -CNAHE} 
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1.E3.D HASH 

This routine hashes the ASCII characters of an entry point 
or external name and computes the address in the hash table-. 
To get the hash code for an entry the ASCII characters are 
added together and the sum is divided by the number of pos- 
sible entries in the hash table- The remainder is the Hash 
code. 

For each entry in the hash table five words are used- The 
hash code is multiplied by S to find the address of the entry 
in the hash table- The hash table is IS pages in length and 
the overflow table is 10 pages in length- There are S7b pos- 
sible entries in the hash table. 

EXAMPLE OF ENTRY IN HASH TABLE- 


ENT ABCDEF 


PTR is equal to ^FFFF if it is the 
last entry In the series of entry 
points with the same hash code- 



The overflow table is used in the same manner as the hash table 
when the hash entry for that hash code is full- When it is 
necessary to make an entry in the overflow tablei the pointer 
•CPTRI is set to point to that entry- This links the entry 
points with the same hash code together. 
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EXAMPLE OF USE OF OVERFLOW TABEL. 

HASH TABLE ENT ABCDEF 

ENT CDABEF 
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1.23.1 ENTRY POINT NANE: HASH 

This program is used by TBSCHl and is declared external. 
HASH is entered by a RTJ HASH- 

1.E3.E Constant table storage referenced by HASH 


NAI1ES USED IN D OCUNEN TA TION 

HASHED 

SUL 

INPCTR 

TEnP 

HSHADR 

HSHTBL 

1.E3.3 Communications region used: 

LPnSK-CEI = a 
FIVE-C^M3> = S 
ZERO-C^EEI = D 

1.E3.4 Constant storage is used as follows: 
1. HASHED 


STORAGE POSITION IN CONSTANT 
TABLE 

44 
Efl 
IS 

45 
43 

lOfl 


E. 

3. 


SUL 

INPCTR 


4. TEnP 


S. 

L. 


HSHADR 
HS HTBL 


contains hash code of ENT or EXT being 
hashed . 

is used as a counter. 

is used to address location of command se- 
quence storage. 

first of S temporary storage locations used 
by hash routine. 

relative address of ENT or EXT on mass memory 
is the number of hash codes in hash table. 


E3.S Exit from HASH 
LABEL 


D 


OPCODE 


jnp 


ADDRESS 


IHASHI 


REMARKS 
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l.EM.D TBSTRl 

The TBSTRl routine is used to store an entry point name and 
its address into the entry point table or an external name 
and its link address into the external table. 

l.BM.l Constant Table Storage Referenced by TBSTRl. 

NAMES USED IN DOCUMENTATION STORAGE POSITION IN CONSTANT 



TABLE 

EXTSTR 

llfi 

OVCTR 

lES 

HSHADR 

M3 

TEMP 

MS 

EXTCTR 

7 

HASHCD 

MM 

PRINTE 

ST 

INPCTR 

IS 

ENTPNT 

13 

SUL 

Ea 


1.E4.E Constant table storage is used as follows: 


1. 

ENTPNT 

contains the absolute core address 
ated with the name to be stored in 
Loader Table. 

associ- 

the 

E. 

SUL 

is used for loop control as a counter. 

3. 

EXTSTR 

word address of start of external 

table . 

M. 

OVCTR 

points to next available location 
flow table. 

in over- 

s. 

HSHADR 

starting address available slot in 
point table. 

en try 

L. 

TEMP 

temporary location. 


7. 

EXTCTR 

points to next available location 
nal table. 

in exter 

a. 

HASHCD 

hash code of entry or external. 


T. 

PRINTE 

used to print error message. 
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1.5M.3 Entry to TBSTRl 

Prior to ontoring TBSTRln tho location INPCTR is sot to the 
1st word address of the sequential locations containing the 
name to be recorded in the LOADER Table. Entry is made to 
TBSTRl with the following instruction: 

LABEL OPCODE ADDRESS REMARKS 

RTJ- TABSTR-,1 

l.BM.M Table Store Operation 
Upon entry to TBSTRl - 

1. The location INPCTR contains the first word add- 
ress of the name for the entry to be made in the 
Loader Table. 

E. The location ENTPNT contains the address for this 
name. 

The TBSTRl subroutine will first make sure that by adding 
another entry to the Loader Tablen there will be no overflow 
of the loader table. Overflow of the loader table will 
result if - that hash table entry and the overflow table are 
full. If this condition should arisen a jump will be made 
to the PRINTS error routine where an error indication of EE 
is printed. Loading is then terminated. 

The address for the name is placed in the fourth word of the 
entry as follows: 

-CENTPNTl > IVALUEl if -CSUbl = 0 

a return jump is then made to the routine STORE. 

The ^pointer^ is placed in the last word of each new entry as 
follows: 

I$FFFF> > IVALUEI 

and a return jump is then made to the routine STORE. 
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l.EM.S Internal Subroutines Used by TBSTRl. 


1.E4.S.1 STORE 


is used to write a word. This routine is 
entered by an 

rtjm store 

To exit from STORE: 


JMP« ISTOREI 


STORE is referenced by STRENT . 

1.2M.S.E STRENT This routine gets the hash address of the 

ENT name and stores it in the appropriate 
table. A $FFFF is stored in the pointer 
word for the entry point. This routine is 
entered by 

RTJm STRENT 

To exit this routine: 

jnPM -CSTRENTI 

l.S>l.S.3 EXSTOR EXSTOR stores the external name and link 

address in the next available slot in the 
external table and increments the external 
table counter. EXSTOR is also an entry 
point. EXSTOR is declared as an external 
in the BLDCRl module. EXSTOR is entered by 

RTJ EXSTOR 

to exit: 

JMP -CEXSTORI 

BITCHK BITCHK is an entry point in TBSTRl and is 

entered by an 

RTJ BITCHK 

to exit: 

JflP IBITCHKI 
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The hash coda is divided by IL to find the 
word and bit position. If the bit is a one 
it indicates an entry in that position in 
the Hash table. 


1.2H.L Exit from TBSTRl 

Following a loader table entryi exit is made from TBSTRl with 
the following instruction: 

LABEL OPCODE ADDRESS REMARK S 

JMP« -CENTSTRl 



If overflow of Loader Table would have occurred as a result 
of the Loader Table entryn exit is made from the TBSTRl rou- 
tine with the following instruction: 

LABEL OPCODE ADDRESS REMARKS 

JMP- PRINTEiI 


(O 
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1.P5.D PAGE 

1.25*1 Calling Sequences 

1. To get a word 

ON ENTRY: -CA> register = execution address of word refer- 

enced 

■C(3> Register saved 
RTJ DISKRD 

NUn $&□□□ or 0 $aOOD indicates ENT-EXT PAGE 

reference n 

ON EXIT: -CA> Register = bJord reference 0 

{.Qy Register is restored 

E • To store a word 

ON ENTRY: TAT register = execution address of word referenced 

•Cc2> register saved 

RTJ DISKUR 

ADC VALUE value to be stored 
Nun ^aaao or a 
ON EXIT: {.Qy Register restored 

l.ES-E Entry Points: 


DISKRD - get a word. 


DISKUR - store a word. 


URTOUT - write out all pages that have been changed. 

1.ES.3 PAGE in Core 

ITM 
1T3 
nE 


These page flags 
are initial ized 
in the STBASE 
module . 


HAS BEEN nODIflED 


NO. Of TIMES REFERENCED 


PAGE NUMBER 
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I = 0 if eSQ 
I = 1 if ENT/EXT 

1.S5.M MDRIV is used to write out the pages onto mass memory. Pages 
are only written on mass memory when used or modified. NDRIV 
is declared external to PAGE. liJhen all the pages in core are 
used the page referenced the fewest number of times is written 
out to mass memory. After externals are patched by the LNKENTn 
LNKCRIt and LNKCRP functions the pages that have been modified 
are written out in order on mass memory. 

1.ES.5 NAMES USED IN DOCUMENTATION STORAGE POSITION IN CONSTANT 

TABLE 

lEE 
107 
110 
131 
130 
117 
in 
lET 
lEfl 
1E7 
ST 

l.ES.L Communications Region Used 

H10-C$E7> = $10 
NZER0-C$1E> = $FFFF 
LPMSKIE} = □ 

ZER0I$EE} = □ 

0NEBIT-C$E3> = 1 

I.ES .7 Constant Storage is Used as Follows: 

1. PAGLGN is the length of a page with core flags. 

E. PAGE length of page on mass memoryi must be a 

multiple of TL. 

3 . MASINP contains logical unit for MDRIV. 



on I 64 
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M . 

LGEPGE 

lar 

s. 

PARBAS 

add 

L. 

NOPAGE 

num 

7. 

ADDR 

is 

fi. 

CORADR 

con 


MAXPGE 

ma X 



mem 

ID. 

CSt3SEC 

s ta 

11. 

ENTSEC 

s ta 

IE. 

PRINTE 

use 

Entry 

to PAGE 


PAGE 

is entered 

by a 


LABEL 


OPCODE 


RTJ 


ADDRESS 

DISKRD 


REMARKS 


or 

RTJ DISKUR 

where DISKRD and DISKBR are externals to the calling program. 
l.ES.R To exit from this routine a 

LABEL OPCODE ADDRESS REMARKS 

JMPm IDISKRDT 

is executed. 

I.ES.IO Other constants and flags used by the PAGE program are: 

RUFLAG 0 if read 

1 if write 


PGFLAG 

UORD 


storage for ENT-EXT/CSC3 FLAG 
word address within a page. 
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LSTPGE 

niNREF 

riAXREF 

niNBAS 

ADPAGE 


page humber being sought, 
page last roferGneed. 

counter for page used the fewest times, 
counter for page used the most times, 
core address of page used fewest times, 
core address of page to be referenced. 


l.BS.ll Possible Errors in PAGE. 


EB 

ElB 

These errors are printed in PRINTE and loading terminates. 
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2.0 Partitioned Core Allocator - PRTCDR 


2-1 General Description 

This routine is designed to allocate the partitions which make 
up Part 1 of the nSOS LSK Special System. 

Partitions are numbered 0 to IS and there may be as many as lb 
partitions in a system. Partition 0 is the lowest -[toward 0} 
in core . 

PRICDR essentially has three sections. One section is entered 
to allocate partitions for a partitioned core request or for 
a directory request. Another section does the table manipula- 
tion and searching for waiting requests. The third section is 
entered to release partitions. 


2.2 Entry Points 


PRTCDR 

Entry to the section which does the table 
ing-i etc. 

search- 

KbSTia 

Entry to release partitions. 


PTNREL 

Schedule request code which is stuffed by 
dynamic core allocator the first time it 
entered . 

the 

is 

KbSCOR 

KbSTlO 

Entry for directory request core allocation. 
Entry for partitioned core requests. 

PTNALC 

Schedule request code which is stuffed by 
dynamic core allocator the first time it 
entered . 

the 
i s 


2.3 Externals 

PARTBL Partitioned core table located in SYSBUF . This 

table is divided into three sections all of them 
lb words long. The first section contains the 
beginning location for each partition. It is 
filled with -0 for any partitions not defined. 

The second section is the tops of partition 
threads. There is a thread for each partition 
defined which is ini ti a 1 i zed . to -Q. This section 
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is filled with 0 for any partitions not defined. 
The third section contains lb locations initi- 
lized to bJhenever a partition or block of 

partitions is assigned the location of this 
section associated with the first partition of 
the block is set to a bit pattern which describes 
what partitions are in the block* This bit pat- 
tern is used to decide what should be released 
on a release request. 

BUSY Partitions busy word located in SYSBUF. Bits 0 

through IS of this word correspond to partitions 
0 through IS respectively. This word is ini- 
tialized with bits corresponding to partitions 
defined set to zero and bits corresponding to 
undefined partitions set to 1. 

LSTLOC Last location plus one of partitioned core. This 

word is also located in SYSBUF. 


DIP Driver in progress flag. If this location of 

SYSBUF is not zero it indicates that the parti- 
tioned core allocator has been interrupted during 
its scan of partition threads. 

RPflASK Location in RU which contains a mask to extract 

request priority from word D of a request. 

SCHERR Entry in RDISP when core is unable to be allo- 

ca ted . 


E.M Detailed Description 

E.M.l Partition Allocation Request Entry 

This section is entered at KbSTlO or KbSCOR for a partitioned 
core request or a directory request respectively. 

On entry 

(3 = Pointer to request parameter list 
I = Pointer to volatile storage 

This section checks to see if the requested partition exists. 
If it does not the error exit from the allocation portion is 
scheduled and jump is made to REC3XT to release volatile etc. 
If the partition is legalT the request is threaded to the 
beginning partition'‘s thread. If the allocation portion is 
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not in progress or it is but has scanned past the partition 
to which this request is threadedT the allocation portion is 
scheduled. 

E.M.E Partition Allocation Section 

This section runs at the same priority level as the dynamic 
core allocator. It is scheduled by the Partitioned Core 
Release request processor or by the Partitioned Core Alloca- 
tion request processor. 

First a scan is made of all the partitions defined in the sys- 
tem beginning at partition □ to see if any requests can be 
filled. If not exit is made to the dispatcher. 

If a directory request is found which can be filled a read is 
scheduled from mass storage to bring in the program. If a 
partitioned core request is found which can be filled the 
completion address is scheduledn if there is onen and the scan 
is continued unless it is at the end of the partitions in 
which case exit is made to the dispatcher. 

E.M.3 Partition Release Request Entry 

KbSTlS is entered from TIE if the request has bit IM set in 
parameter word 

On entry: 

Q = Pointer to request parameter list 
I = Pointer to volatile storage 

The release request processor checks to see if the partition 
actually exists and is busy. If so the beginning partition 
of the block is located and the busy word and use word are 
set to indicate that the block has been released. After a 
block is released exit is made to the Partition Allocation 
section . 

E . M . M Request Parameter Lists 

S.M.M.l Partitioned Core Release Parameter List 

Word □ Request code with bit m set and bit zero indi- 

cating exit to dispatcher after release. 

Word 1 Address within block to be released. 
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E.M.M.5 Partitioned Core Request Parameter List 

Word 0 Request code and priority levels 

Uord 1 Completion address 

Word E Thread 

Word' 3 Requesters (3 

Word M Number of words 

Word S Starting partition -CIS or less} 
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Vola ti le 

Contents 
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0- 

(3 register of requester 

Word 

1; 

A register of requester 

Word 

E 

I register of requester 
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3 

Return address from request pro 

Word 

M 

Request priority -CPar ti ti oned c 
requests only} 

Word 

S 

Pointer to request 

Word 

y 

Request word 1 

Word: 

7 

Request code 

Worci 
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Indirect request indicator 
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3.0 Part 1 Indirect Request Processor - Tib 


3.1 General Descripti 


on 


request "re^ie\t%Cde lb"L"s' indicate an indirect 

request should be used whenever there'^is^the"'^^'^'^ 

the request referenced indirectly is located i^L'nk rof'^core. 


3*E Entry Point 

TIL - Entry from NON I 


3.3 Externals 


ASC - Entry in nONI 


3-M Detail Description 


This routine is entered from nONI with 


A - Pointer to the parameter list 
I = Pointer to Volatile Storage 


sing the request.,^ ° continues proces- 
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